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RIAL 



Looking back over the eight issues so far of 
HARDCORE, there has been a consistent trend of 
improvement in the size and quality of the 
magazine in general. There has, unfortunately, 
also been a consistent trend of deterioration in 
the site of the editorials, as deadlines loom with 
persistent, if not monotonous, regularity. Both 
these trends, I am pleased in the former case and 
ashamed in the latter case to say, continue' 



David Bolton 



GAME REVIEW 
*********** 



time, if you manage to bump into them, 
you eat them (it makes a change for you 
to eat the ghosts - not be eaten !!!). 
If you manage to eat the ghosts then you 
score points - 200pts for the first 
400pts for the second 800pts for the 
third and 1600pts !! for the fourth. 
However if you do manage to get the 
better of them they will still be reborn 
again in the centre of the maze. The 
game consists of seven levels each 
represented by a fruit which also 
appears near the centre of the maze at 
random times allowing the puckman to eat 
it and receive more points. The first 
level is fairly difficult and after 
having the game for more than two months 
I have still not managed to get further 
than the * SECOND' level with onlv 
10800pts!!!. The documentation does say 
that at first the direction keys aren't 
very responsive, this however as 
explained in the manual is due to your 
timing, you will after 10 or so games be 
able to handle the puckman much better. 



SNOGGLE 
******* 

BY STUART MORLEY 

Snaggle is a fast hires arcade game for 
1 player, when the disk is booted on 
either a 13 or 16 sector Apple the 
program starts by issuing an attractive 
title page, as this page is displayed 
the main program loads, to the sound of 
strange clicking noises. After about 
15-20 seconds the main title page is 
displayed and the game commences. The 
object of the game is simple , the 
player (denoted by a round object with a 
mouth that opens and closes) has to 
travel around a small maze as shown in 
the picture. The puckman (player) is 
steered by four keys A l Z»<-?-> 
Up, down, left, right respectively. The 
puckman must eat all of the dots in the 
mare to be allowed to proceed to the 
level. However to make the game 
difficult four ghosts also inhabit 
maze, which may sound alright, but 
have a tendency to eat you if you 
not careful and bump into them !!! 
do however have at your disposal 
dots that are placed in all four 
corners of the screen. These help in the 
following ways : If you travel over 
these dots then the ghosts become almost 
invisable for about 5 seconds in which 



next 

more 

the 

they 

are 

You 

four 



I have found that out of all the games I 
have I always seem to come back to 
Snoggle & never seem to either beat it 
or get bored with it. 

If you are frustrated by programs that 
are not easily mastered then don't buy 

Snoggle ! ! ! 
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LOCAL GROUPS 



L EIOESTHR APF1.E USERS 
G ROUP FOR HELP AND SUPPORT 
CL»A«U»G»H«S> 
(Affiliated -to BASUG) 

This is a thriving group of lively Apple Users 
which started nine months ago. With our 
increasing membership we have now outgrown our 
present premises at the 'Leicester Computer 
Centre' and from 7th April 1982 we have been 
meeting at: 

The Winstanley Arms 

The Glade 

Narborough Road 

Leicester 

(Nr Ml Junction 21) 

Our meetings vary in content and include 
interesting discussions and speaklers, 
demonstrations of software and "Help Forums". 
Members' facilities include (embryonic) software 
and text libraries and discounts on computer 
products. 

If you are a BASUG member or an Apple User 
living in the East Midlands area you would be 
welcome at our meetings which start at 7.30 p.m. 
on the 1st Wednesday of the month. 
If you require further information this can be 
obtained from the Secretary! 
Hazel Brown 



or 



Mike Preston (Chairman) Tel. : i 



May we through you kind offices provide further 
details of our Group? We meet at 7.00 p.m. on the 
2nd Monday of the month. 

We are all professionally involved in Apples or 
ITT 2020's, nearly all do some programming, but 
are not impartial to producing and discussing 
games programs. Recent illustrated lectures 
have been on Structured Programming* Databases 
and Apple Comms. 

As our venue is still unsettled, readers might 
care to phone me at 'H>u = K *- "mt'b evenings far 
details. 

Paul Vernon 
Hon Sec. 



basug aaaa LfM w< mam 

Report by Tony Williams 



Eagle-eyed basuggers will at once have spotted 
the subtle renaming of the Raynes Park Group. 
Members recently did a quick tally of themselves 
and concluded that la! they did not come from 
South West London at all - but from all over, 
actually. No shillyshalliers they, the modest 
title of "South London" was assumed forthwith. 
Meetings will continue to be held in the 

Raynes Park Methodist church. 

Worple Rd 

Entrance 2nd door up Tolverne Rd 
News in brief. Warren Avery has bowed out as 
chairman after a year or so's valiant and selfless 
service. Into his shoes stepped Michael Leeming. 
Tony Freedman is Hon Treas. and Neil 
Stephenson Secretary* I think. An organized 
bunch this lot. They already know their 
programme through to December! And here are 
the dates you need to knowt 

8th July: Printers 

9th Sept: Microcomputers in Education (Jim 
Brannin) 

14th Oct! Communications and Networking. 
11th November: What do I do with my slots? 
(i.e. peripherals and that) 
9th Dec: Games. 



South London has stabilized its meetings to the 
second Thursday in every month, except August. 
Neil Stephenson has promised to write a round up 
of reports on meetings already held, including 
Ian Trackman's "Ins and Outs of Machine Code" 
presentation on May 13. 

B.A.S.U.6 

SOUTH LONDON GROUP 

Raynes Park Methodist Church 

Worple Road 
Entrance 2nd Door Up TolvernB Rd. 

2nd Thursday Of Each Honth at 7-30 PH 



10 June BASUG SottNare Library. 

8 July Printers 

9 Sept Micros in Education. -Jii Brannin. 



14 Oct Couunications and Nttitorking, 



11 Nov Nhat Do I Do With My Slots. 
9 Dec 6aiei. 
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by John Sharp 

At the end of the last Beginners Page, I posed 
the problem of printing the letters of the 
alphabet in pairs, AZ BY etc. Before going that 
far, how are we going to print the alphabet at all 
using a loop. We want to say! 

PRINT "ABCDE.mhWXYZ" 

and the APPLE does not allow loops like 



10 FOR m = "A" TO 
20 PRINT N$ 
30 NEXT N* 

FOR=NEXT loops only work with numbers, as the 
computer can only work by counting, so we have 
to find a numerical code for the letters. 

APPLESOFT (but not INTEGER BASIC) has a 
command to convert numbers to letters S- 
CHR$(N) where N is a number or numerical 
variable. IF N= 65 then CHR$(N) = "A" and so on 
up to 90 when CHR*(N> = "Z". 

So, to print all the letters we have the simple 
program 

10 FOR N = 65 TO 90 
20 PRINT CHR$(N) 
30 NEXT N 

If we make line 20 PRINT CHR$(N)J they will 
print next to one another on the same line. 
Now when we want to print not ABCDEF.,.. but 
AZ BY CX etc., we have two movements of the 
numbers so to speak. We have to find a way to 
allow the number to increase to give us the A to 
Z part and at the same time decrease so that we 
can run backwards. The decrease is regular! if we 
look in terms of the numbers we see [- 

AZ CHR*(63)JCHR4(90) 
BY CHRt(66);CHR$(89) 

; ; : 



The numbers are increasing by one in the first 
column and decreasing by one in the other. The 
numbers are not related to one another or are 
they? If you look closely you will see that 65 + 
90 ■ 155 as does 66 + 89 and so on. So the oeneral 
case would be CHR$<N> \ CHR*(155-N). 
Thus it is really guite easy. We replace line 20 in 
the above program by 



20 PRINT CHR*<65 + N)i CHR»(155) - N 

Thanks to Vernon Quaintance for that solution. 
There is another way to use a similar loop!- 

10FORN = to 25 

20 PRINT CHR$(65 + N)S CHR$(90 -N) 

30 NEXT 

Yet another wav would be *- 
10 LET M = 92 
20 FOR N = 65 TO 90 
30 M = M -1 

40 PRINT CHR$(N)| CHR*<M> 
50 NEXT N 

This isn't too elegant in this particular case; the 
other two are better. However, if the two are not 
connected we might need to use this sort of 
approach e.g. 

10 FOR K ■ ! to 10 

20 M = M + 2 

30 PRINT CHR*<N)| CHR$(M> 
40 NEXT N 

So loops require juggling with numbers. A 
training in mathematical puzzles gives one a 
distinct advantage in such programming. By 
seeing such connections, very succinct programs 
can be obtained. 

Let's now build up a set of loops to show what I 
mean. 

Suppose we wish to "draw" a checkerboard using 
the screen in the text mode. It would be similar 
on the GRAPHICS screen. 

We will use a character "*". As the screen is 24 
characters high, we can use blocks of 3. Starting 
with three '*'s means a loop thus? 

200 FOR N = 1 to 3 
210 PRINT "*"; 
220 NEXT N 

Now if we build three rows of these by addingt- 

150 FOR M = 1 to 3 
250 NEXT M 

Remember that the loop for M must be outside 
that for the N loop, 

But wait a minute , this prints all in one line, 
since line 210 ends in a "5". 

We need to send a "go back to the next line" 
command before going on. That is outside the "N" 
loop but inside the "M" loop. We can do this by 
adding:- 
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230 PRINT 

Now we wish to move these blocks about the 
screen leavinq a gap of three spaces. Adding the 
lines :- 

100 FOR L = TO 18 STEP 6 
300 NEXT L 

The step 6 makes sure that 3 spaces are added as 
well. 

To make the movement across, we can make use 
of the HTAB command instead. BUT we must 
make sure that we travel the distance moved by 
the N loop as well as that of the L loop* 
otherwise we print on top of one another. If we 
add the movement down with a VTAB r we can 
remove the PRINT command in line 230. 
Line 10 has been added to see the picture 
cleanly* and slow it down to see exactly what is 
going on as the computer is moving too fast for 
the eye. 



10 HOME : SPEED = 100 
100 FORL = 0TO18STEP b 
150 FOR M = 1 TO 3 
200 FOR N = 1 TO 3 
205 HTAB L + N 
207 VTAB M 
210 PRINT 
220 NEXT N 
230 NEXT M 
250 NEXT L 



Now we need to produce the rows. If we add 
80 FORK =0TO21 STEP 3 
400 NEXT K 

and alter line 207 to VTAB M + K 

This gives a downward movement, but not the 
familiar checkerboard. We need to check if we are 
on an odd or an even row r to see whether we 
start at the end or at the next block along. So 
adding a some new lines 85/90 and altering 100 
to take account of the changes gives the final 
program as follows. 

to HOME: SPEED - 100 

80 FORK =0 TO 21 STEP 3 

85 IF ( (K/2) - (INT k/2 + .005) ) 0.4 

THEN A = 0: B = 18: GOTO 100 
90 A = 3JB = 21 
100 FOR L = A TO B STEP 6 
150 FOR M = 1 TO 3 
200 FOR N = 1 TO 3 
205 HTAB N +L 
207 VTAB K + M 
210 PRINT "*"; 
250 NEXT M 
300 NEXT L 
400 NEXT K 

450 IF PEEK (-16384) < 127 THEN 450 



Thus it is quite a short program, if tackled in the 
right way* with the computer doing the work. I 
was once asked to show someone how to da this, 
(not an APPLE) because despite having a 4K 
machine, he had run out of memory! 

What about that last line? Well leave it out and 
see what happens. 



EgfSPM PRJ> fTEF: PACES 

by Quentin Reidford 

/To ease the burden on John Sharp and the other 
stalwarts in the deep south Quentin of Sheffield 
has volunteered to take up writing the Epson 
Pages./ 

As John Sharp mentioned in his article in the 
February '82 'Hardcore' the main source of 
erratic printing problems lies in the use of 
different PROMS on the interface card. My card 
uses the 'D' version of the PROM and has worked 
'by the book' - and this includes the 
EMPHASISED driver submitted by John, Some 
curiosities, however, include the use of TABS in 
print statements^ I find that I have to use the 
TAB (n) mode - counting the value of (n) from the 
last printed position on that line, plus the length 
of any string on that line. An example of this can 
be found in the useful utility by John Sharp in 
the Feb. issue - the Catalog Label Printer. This 
requires a variable (T) to allow tabbing. 



685 T = LEN <NAME$(ZW REM *** 
Tabbing constant on first field 

690 PRINT NAMES (Z>; TAB( 80 - T) 
;NAME$(2 + INT (N/2) + PI 

Perhaps the main disappointment in the MX-30, 
however, is in the distortion of graphics. The 
printer, in its F/T 2 guise, will, as you know, 
dump either of the Hi-res screens through 
software. On the F/T 80, however, the gearing of 
the print head is such that it travels too quickly 
resulting, for instance, in ellipses rather than 
circles being printed. Even more irritating is the 
inability to print the whole screen in the 
EXTENDED mode. If anyone has any ideas that 
they wish to share, PLEASE write in. 

Perhaps the most newsworthy item is the 
availability of the LCC 8132 EPSON EPROM from 
Leicester Computer Centre, 



Pages 
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This EPROM is a direct replacement for the 
PROM in location 4a on the Epson Apple 
interface card. I have not had time to make a 
thorough review of its capabilities in this issue, 
but briefly it will allow the Epson to behave with 
programs like VISICALC, DB-M ASTER and, 
apparently, APPLE-SPELLER. 

This is because the Pram obeys normal printer 
conventions e.g. - Ctrl I 80 K and can therefore 
be recognised by the software* Good news for 
those who have the misfortune of having DB 
MASTER and an Epson. At appro*. D3»00 + VAT 
this EPROM is cheaper than going out for an 
Centronics* 

Other features include the use of CTRL 
characters instead of POKES for graphics dumps. 

CTRL I G 2 E I <RETURN>, for instance, will 
dump the contents of -COraphics, page <2>, 
<E>xpanded and <I>nversed - easier to remember 
too. 

The PROM comes with a slim plastic-bound 
booklet explaining the options and changes and 
complete with listings for three demonstration 
programs* 

I have had this one in for about four hours and I 
am now forced to think of plausible excuses to 
give my wife that it is an essential 
acquisition... .Seriously though, I would think that 
it has to be a must, especially for those with the 
Revision 'C and earlier Epson PROM. 



The other EPSON utility program which is on the 
market is OMNIFONT. This allows the use of all 
the fonts from the DOS TOOLKIT within a 
printing program, with up to four of those fonts 
within the same program# The disc contains a 
modified driver for Apple Writer allowing the 
user to print a letter in any font, either your own 
or one from the toolkit* Obviously to make use of 
the whole package you require both Apple Writer 
and the Toolkit. The software supports 
EXTENDED, CONDENSED, UNDERLINED and 
INVERSE printing, although you can get some odd 
results tryinq to justify in the extended mode* 
The BASIC program's ANIMATRIX module 
enables the user to print out logos or symbols f 
although you need to use the VARIABLE LINE 
SPACING algorithm to ensure that all the pieces 
join up. Any of you who have experienced the 
brain-ache in converting Binary to Hex. for 
Bit-image printing will appreciate this feature.., 



Initial versions of the program had either a buo 
or possibly only an unusual logic switch which 
caused the Applewriter section to crash. 
Happily, later versions have cured this and the 
program works beautifully, althouah using the 
standard program i.e., without Apple Writer 
option can be hard ooing! 

Finally, for those who were lucky enough NOT to 
experience any difficulty in using the ENHANCED 
driver. If you have been using it to print from a 
constant address of 300 at option 'J' then you 
will find that if you change 'J' back to C100 your 
file will be printed out in CONDENSED mode. 
However it will only work AFTER you have 
PRINTED in Enhanced mode first. And don't 
forget to alter your right margin !.... 

Please write to me c/o BASUG and I will try to 
answer any problems. PLEASE send any solutions 
to problems that you have had and managed to 
overcome.. ..If you DO have a problem then be 
sure to include the DOS version you use and if 
possible the PROM version in your card. 



My thanks to MICROSOURCE for allowing me 
review copies of both OMNIFONT and the' LCC 
8132 EPSON EPROM. 



There was a mistake in the listing of 
CATALABEL program by John Sharp in 
February's HARDCORE, which a number of people 
picked up. It concerned the DATA in lines 130 & 
139. T have added a few enhancements as well, 
see lines 175/180/630/685/720/745} the revised 
listing is!- 



PR£ 0: TN£ 



1 LIST 

72 PRINT CHR* (18): 

o: CALL 1002 
100 DIM NAME$(105> 
110 TEF.XT : HOME 
120 D% * CHR* <D 
130 FOR N a 8192 TO 82231 

t POKE N,MJ NEXT 
132 DATA 169,32,160,10,32, 181,1 

83,96 

134 DATA 
136 DATA 
138 DATA 


HTAB 151 PRINT "CATALABEL" 

8t PRINT "CATALOG LABEL 



READ 11 



0,0,1,96,1,0,17,0 
27,32,0,33,0,0,1,0 
* 0,96,1,0,1,239,216, 



140 
ISO 



HTAB 
GENERATOR 
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160 ISECT « 8207tICMD - 3214:iBUF 
P • 8211 

170 REM XXXREAD CAT TNT MEM*** 
175 TEXT t HOME t VTAB 10: PRINT 

"ENTER TITLE OF DISC > "JJ INPUT 

ft* 

180 UTAB lOt CALL - 868: PRINT 
"SET UP PRINTER AND SWITCH 
N-THEN— " t PRINT "PUT DISC IN 

DRIVE AND PRESS RETURN"; GET 
A*: IF A* < > CHR* (13) THEN 
180 

190 TEXT t HOME } VTAB 10! HTAB 
13: PRINT "GETTING CATALOG" 

200 CMD « 1IBUFP - 33 t SECT m 15t POKE 
ICMD»CMD 

210 POKE ISECT f SECT: POKE IBUFP, 

BUFP 
220 CALL 8192 

230 SECT * SECT - i:BUFP » BUFP * 
11 IF SECT > - 1 THEN 210 

240 TEXT t HOME 5 UTAB 10 X HTAB 
13: PRINT "SORTING CATALOG O 
UT" 

250 VTAB 20 

260 REM *x* FILE INPUT ROUTINE 

FROM MEM TO ARRAY*** 
270 B = 8459 
280 N == 

290 FOR R =- TO 14 

30 PRINT ">"; 

310 A = B + 256 * R 

320 FOR 3 *>: O TO & 

330 PRINT "♦"J 

340 N ~ N + 1?NAME*(N) * " " 

350 IF PEEK (A * S x 35> » 255 THEN 
N = N » i: GOTO 570 ; REM *x 
* IF FILE DELETED THEN IGNOR 
Ex** 

360 TYPE *= PEEK <A + 2 + S * 35) 

370 TF TYPE < 128 THEN NAME* ( N ) = 

NAME* (N) * " "S GOTO 39 
380 TYPE = TYPE - 128:NAME*<N> - 

NAME$(N) + "*" 
390 IF TYPE * THEN NAME* < N > = 

NAME* (N ) + " T" 
400 TF TYPE! m 1 THEN NAME* ( N ) = 

NAME* < N ) + " I" 
410 IT TYPE m 2 THEN NAME* < N ) « 

NAME* (N ) * " A" 
420 IF TYPE «= 4 THEN NAME* < N ) - 

NAME* ( N ) + " B" 
430 IF TYPE a 8 THEN NAME* < N ) » 

NAME* <N ) + " S" 
440 IF TYPE - 16 THEN NAME* C N ) « 

NAME* < N ) * " R" 
450 IF TYPE ■ 32 THEN NAME* C N ) - 

NAME* (NO + " B" 
460 LGTH = PEEK C A + 3 3 + S x 35 

) 



470 L.H* - STR* <LGTH> *L - LEN < 
LH*5 

480 FOR H - TO 2 ~~ L;LH* - "0" 

+ LH*S NEXT 
490 NAME*<N> = NAME* <N ) + " " •♦• L 

H* * " " 
50 FOR M = TO 30 
510 E * PEEK (A + 3 + S * 35 + M 

> 

520 F - PEEK (A + 4 + S * 35 + M 
> 

530 IF E = 160 AND F ■ 160 THEN 
570 

54 IF E = AND F ■ THEN NAME 

*<N> = : " "? GOTO 600 
550 NAME* ( N ) * NAME* ( N ) + CHR* < 

E) 

560 NEXT M 
570 NEXT S 
580 NEXT R 
590 PRINT 

60 TEXT : HOME : WTAB to : HTAB 
10 : PRINT "SENDING CATALOG T 
O PRINTER" 

610 PR£ i: PRINT CHR* C0>? PRINT 
CHR* (0) 

620 POKE 1657*100 

630 PRINT CHR* (14);" CATALOG : 

" |TT*J PRINT CHR* (15) 
610 N - N - 1 

650 BD = N / 2 - INT <N / 2 + .0 
02JS IF BD > ,1 THEN PI = It 
GOTO 670? REM XXXQpP NO OF 
FIL ES*** 

660 PI = 0: REM *** EVEN NO OF FI 
LEG*** 

670 REM ***ACTUALL Y PRINTOUT*** 

680 FOR Z - 1 TO N / 2 

685 T * LEN ( NAME* ( Z ) ) * REM *** 

TABBING CONSTANT ON FIRST FI 

ELD *** 

690 PRINT NAME*< Z > J TAB ( 80 T) 
;NAME*(Z + INT <N / 2) * PI 
> 

700 NEXT 

710 FOR M m 1 TO 51 PRINT J NEXT 

720 PRINT CHR* (18)1 PR£ 0t IN£ 

o: CALL 1002 
730 TEXT ! HUME ♦ M TAB 10 J CALL 
- 868J INPUT "DO YOU HAVE A 

NY MORE TO CATALOG?" J AN* 
740 IF AN* - "YES" OR AN* - "Y" THEN 

160 

745 POKE 1657,40 t REM ***RESET 
PRINTER -JUST IN CASE-IF NUT 
CONTINUING WITH PROG ♦ *** 
750 END 
3 



\ferbatim Datalife 



disks for the 



performance 



of a lifetime 



MINIDISKS 

Verbatim, the world's leading producer of 
minidisks, makes the widest range of minidisks 
available for word processing and data processing 
applications. Intent on maintaining this position 
of leadership, we constantly strive to make our 
minidisks even better. 

Each Verbatim Datalife™ minidisk is 
equipped with a hub reinforcing ring to aid in 
registration, reduce errors and give better alignment 
repeatability. Our dual-sided, double density 
Datalife 1 " minidisks offer users higher storage 
capacity. Our new plastic box makes our minidisks 
easier to use, safer and more convenient to siore. 
Our testing standards go beyond the industry 
standard because we insist on Verbatim being the 
industry standard of excellence. 



Introducing 



CLEANING DISKS 

The Verbatim- Datalife'" Head Cleaning Disk 
is a convenient, reliable, safe means of removing 
up to 90 percent of debris contaminating magnetic 
recording heads used in computer and word 
processing systems. 

The Verbatim Datalife™ Head Cleaning Kit 
consists of a durable, reusable, Lexan * jacket and 
presaturated, disposable cleaning disks. 

The Verbatim approach is superior to and 
less expensive than other cleaning disks presently 
available. 

The kit, available in 8" and 5W sizes, differs 
from those already available in the marketplace 
in the following ways: 

- The Verbatim cleaning disks are disposable. 
This approach allows a fresh clean disk to 
be used each time. No accumulated debris 
from previous cleanings comes in contact 
with the heads. 

- Each cleaning disk is presaturated with a 
precise amount of cleaning solution. Pre- 
saturation eliminates the inconvenience 
associated with splashing solvents onto 

a disk. 





SPECIAL OFFER TO B.A.S.U.G. MEMBERS CNLY 

10 X MINIDISKETTES C19»5Q INCLUSIVE OF 

V.A.T. AND PCST. 

I ENCLOSE A CHEQUE MADE PAYABLE TO 

B.A.S.U.G. CHEQUE No PLEASE 

FORWARD TO ME BY RETURN AT TOE ENCLOSED 
ADDRESS. 

NAME - 

ADDRESS 

PCST CODE 
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yrOW YOU SEE XT..... 



maw w 9 
6-11-81 

Dear Sirs, 

A week ago I boasted to a biologist 
at my college that was enquring about a 
program to measure reaction time that it was 
easy!! He said prov* it, so I sat down 
yesterday evening and wrote one -for the APPLE 
II which I encloses- 

REM REACTION TIME 

5 HIMEMi 24575 

10 TEXT i HOME 

20 START - 24576 

30 COUNT = 24832 

40 QOSUB 230 

50 POKE COUNT , : POKE COUNT+1,0 
60 X - 3000 

70 VTAB lOs PRINT "WHEN THE SQUARE APPEARS 
PRESS ANY KEY" 

80 FOR PAUSE = 1 TO XsNEXT PAUSE 
90 GR: COLOR »= 15 

10O X « 2500 * RNDU)iX - X + 500 

110 FOR PAUSE = 1 TO XiNEXT PAUSE 

123 PLOT 20,20 

130 CALL START 

140 POKE -16368,0 

150 TEXTs HOME 

160 VTAB 10 

170 IF PEEK<C0UNT)-O AND PEEK (COUNT+l ) »0 THEN 

PRINT "TOO SLOW! ! "sGOTO 190 

180 PRINT < PEEK (COUNT + 1) * 256 

+PEEK (COUNT) ) * 23E - 6| " SECONDS." 

190 PR I NT i PRINT: INPUT "AGAIN (Y/N)",A* 

200 HOME 

210 IF LEFT* (A*, 1)-»Y M THEN 50 
220 END 
230 DATA 

44, 16,192,238,0,97,208, 11,238, 1,97,240,5,44,0, 

192, 16,241,96,234,234,208,246 

240 FOR I m START TO START + 22 

250 READ Xi POKE I,X 

260 NEXT I 

270 RETURN 



Yours faithfully. 



Peter Wick' 




SPECIALIST IN 
EDUCATIONAL SOFTWARE 

Teacher's Toolkit; 

Apple and Pet Disk £25.00 
Pet Cass £20.00 
German Teaching and Testing routines 
Apple and Pet £10.00 
Apfeldeutsch: full tkl German teaching 
package Apple only €130.00 

(20% discount for schools) 

French/German Chip Pel £25.00 
Shape Manager Apple disk £45 00 

Master Maths 

CAL Maths up to '0' level 

Apple disks (6) £90 00 
ZX81 cassettes £20 

Aristotle's Apple 

Multiple choice builder £25.00 

Wordpack ZX81 

CAL games for EFL 

Wordpacksl & 7 cass £4 50 
Wordpacks 3 4 4 cass £5.00 

Apple Pilot 

Authoring language to. combine 

sound text and graphics £84 00 
Lowbrook Tapes 
Numeracy programs for 
primary school Pel £10.00 

Timetabling Book £10.95 

Software for 3S0Z, TKS80, PfcT. 

Apple £30.00 

All prices Include VAT 
Wlda Software 
Trie Red House 
2 Nicholas Gardens 
Ealing, London W5 SHY 
Tel. 01-567 6941 & 062882 5206 



COSMOS SCREEN MIXER 

MIX THE DIFFERENT SCREENS including 
LQ-RES, TEXT and W=RES to produce 
completely new efects. 

THE SCREEN MIXER is a set of nodules 
which replace three ICs on the APPLE 
II notherboard, which allows nixing of 
any two screens fro* HGR, HGR2, GR1 
end m t TEXT1 end TEXTZ, 
withoutsoftware but under software 
control t Does not vse up any slots. 



By nixing HGR screens, it is possible 
to have 560 dot resolution across the 
screen. You can also have Z80 dots of 
half tone, black or white dots in one 
line. 



PRICE INCL nanusl and software 
VAT etc £3o*50 



FROM 

MICROSOURCE 

1 BRANCH RD, PARK ST 
ST ALBANS, HERTS 
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RANDOM TILING 

5y R.A.Fairthorne 

Making patterns from repeated modules is a 
basic technique well suited to the computer. The 
modules, or 'motifs', can be chosen by rule or at 
random. The resulting patterns are of interest 
mathematically, and statistically, and are 
sometimes pleasing as well. Computer graphics 
experts have used this technique for quite a 
time. 

Here is a simple minded program to suggest 
possibilities.lt simulates the laying of square 
tiles whose motifs and internal colouring are 
chosen at random.To preserve unity in the 
randomized patterns there are four sets of 
motifs, each appropriate to a common theme. 

The completed patterns can be stretched 
vertically or horizontally. This does not affect 
the number of plotted points in the original tiles, 
only the distances between them and the number 
of tiles in the pattern. The smaller the scale the 
longer it takes, and the worse the resolution. 

On the other hand too large a difference between 
the horizontal and vertical scales may turn 
slanted lines into almost vertical or almost 
horizontal ones. Apple hi-res does not take 
kindly to these except in long lengths. For this 
and other reasons it is best to keep to 
horizontals and verticals and slopes of 1-to-l 
(as in 'Chinese'), 2-to-l (as in 'Islamic'), and 
3-to-l (as in 'Kells') or in combination <as in 
'Star')* 

Also, to avoid visual chaos, it is better to 
restrict colours, Here you have the choice of 
white/orange or white/green. Colours are fixed 
for 'Islamic' at white/green. They can be fixed 
for other themes by replacing the randomizing 
instructions for 'A'and'B' in line 125 by specific 
Hcolor numbers. 

Subroutines are used to define the motifs, though 
shape tables are the more powerful in general. 
This is to make it easy for the user to modify the 
program experimentally. The arrays dimensioned 
in lines 10 and 15 give the coordinates of the 
points to be joined in each motif, each row 
representing one motif, for example 'DIM C(2,7)' 
indicates that this theme uses 3 motifs (0,1,2) 
and 4 points each needing 2 coordinates? i.e 8 
data items for each motif. These data are given 
in line 2100. 

The subroutines tell how the points are to be 
joined, and the colours of the different paths of a 
motif. Thus line 500 is a subroutine for a single 
path joining four points (if the coordinates of the 
first and last points were the same it would draw 



a triangle). Line 600 uses this twice as a 
subsubroutine because 'Islamic' motifs consist of 
two joins of four points. Subroutine 700 joins 
three points and two points. Subroutine 300 joins 
two pairs of points. 

The step size 'S', in line 110 and subsequently, is 
the side of the basic square. For 'Kells' it is 5; 
for the others 4. 

If you wish to make patterns one at a time and 
retain them for saving to disk or to 'fill in', 
delete lines 130, 135. Then 'RUM' when you want 
to change. 'Filling in' a 'Star' pattern can produce 
interesting, if meaningless, results. 



TEXT 
5 VTAB 



10 



J HOME 

4: PRINT TAB< 10) "RANDOM 

TILING" I PRINT 
PRINT TAB< 1 2 ) "R * A • FAIRT|H0RN 
E": PRINT : PRINT TAB ( 15)" 
FEB * 1982" 
15 FOR R ■ TO 1000: NEXT R 
20 DIM K<7,7) 
25 DIM S(3,9) J DIM C<2»7> 
FOR I = TO 7i FOR J 



30 



TO 



7 



NEXT J: NEXT 
3! FOR J = 



I 

TO 



I 
TO 



PRINT 



35 READ K<I, J) J 
40 FOR 1=0 TO 
9 

45 READ S<I,J>: NEXT JJ NEXT 
50 FOR I = TO 2 J FOR J - 
7 

55 READ C<I,J): NEXT Jt NEXT I 
60 TEXT J HOME I VTAB 4 
65 PRINT TAB ( 17) "THEMES" i 
J PRJNT 

70 PRINT TAB( 12)"1. KELLS" ♦ PRINT 
75 PRINT TAB( 12)"2. ISLAMIC" * PRINT 
80 PRINT TAB( 12)"3, STAR" ♦ PRINT 
85 PRINT TAB ( 12) "4. CHINESE" ♦ PRINT 
90 PRINT I PRINT TAB< 18>"5* EN 

D PROGRAM" 
95 PRINT t PRINT i PRINT TAB( 1 

5) * INPUT "WHICH(1-5)?";T 
100 HOME : VTAB 4 
105 IF T = 5 GOTO 210 
110 PRINT TAB< 10): INPUT "WIDT 

H OF TILE<1-7)?"JW 
115 PRINT TAB( 10)1 INPUT "HEIG 

HT OF TILE<1-7)? m ;H 
120 IF T m 2 GOTO 145 
125 PRINT TAB ( 2): INPUT "WHITE 

/GREEN ( ) OR WHITE/ORANGEC 1 ) 

?" ;c 

130 VTAB 20 i PRINT "PRESS ANY KE 
Y TO CONTINUE, SPACE BAR FOR 
MENU" • GET A$ 
135 IF A* a " " THEN GOTO 60 
140 GOTO 145 

145 HGR ; POKE - 16302,0? REM * 
**FULL SCREEN ON PAGE ONE*** 
150 REM ***TILE LAYING*** 
155 5=4t IF T = 1 THEN S m 5 
160 FOR M = 1 TO 241 STEP S * W 
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165 FOR N = TO 165 STEP S * H 
170 A = 2 * INT ( RND (1) + .5) + 
2 tt G + itfl » 2 * INT ( RND 
(1) + ,5) + 2 * C + It REM * 
*«SELECTION OF MOTIF COLOURS 
XXX 

175 REM xxxMOTIF SELECTION*** 

180 P = INT C4 x RND CD) 

185 IF T = 1 THEN GOSUB 500 1 REM 

xxxKELLSxxx 
190 IF T = 2 THEN P = INT (2 x 

RND (1)) + 41 GOSUB 600: REM 

xxxTSLAMIC*** 
195 IF T = 3 THEN GOSUB 700! REM 

xxxSTARxxx 
200 IF T M THEN P = INT (3 * 

RND <1)>: GOSUB 80 
205 NEXT N: NEXT M! GOTO 130 
210 HOME t END 

498 REM xxxSUBROUTINES FOR MOTIF 
SxxKELLSxxx 

500 HCQLOR* A! HPLOT M + K(P,0> * 
W,N + KCPil) * H TO M + K<P# 
2) X W,N + K(P,3) x H TO M + 
K<P,4) x W,N + K<P,5> * H TO 
M + K<P>4) x u,N + K(P,5) * 
H TO M + K(Pr6) x W,N + K(P# 
7) x HJ RETURN 

600 A = 31 GOSUB 500 

610 A = IIP ■ P + 2t GOSUB 500: RETURN 
70 HCOLOR= A: HPLOT M + S(P,0> * 

W,N + S(FM) x H TO M + S(P, 

2) x W,N + S(P f 3) x H 
710 HCOLOR= B! HPLOT M + S<P,4> * 

W,N + S<P,5> * H TO M + SCP, 

6) x W,N + S(P»7) x H TO M + 

S(P,8) x W,N + 3 (Ft 9) * Ht RETURN 
800 HCOLOR= A: HPLOT M + C<P,0) * 

WtN + C<P,1) x H TO M + CiPt 

2) X W,N + C<P,3> * H 
810 HCOLOR- BJ HPLOT M + C<P,4) x 

W,N + C(P,5) x H TO M + ECP* 

6) x W,N + C(P,7) * h: RETURN 
180 DATA 0,0, 3,1,2, 4,5, 5, 0,0,1 

,3,1,2,5,5,5,0,2,1,3,4,0,5,5 

,0,4,3,1,2,0,5 
190 DATA 0,0,0,1,4,3,4,4,0,4,0 

,3,4,1,4,0,0,4,1,4,3,0,4,0,0 

,0,1,0,3,4,4,4 
20 00 DATA 0,2,2,0,2,4,1,1,4,2,2 

,0,4,2,0,2,3,1,2,4,4,2,2,4,2 

,0,3,3,0,2,2,4,0,2,2,0,1,3,4 

tZ 

2100 DATA 0,2,2,0,2,4,4,2,0,2,4 
,2,2,0,2,4,0,2,2,4,2,0,4,2 

3000 REM »»»»>««<«« 

> < 

> R.A.FAIRTHORNE < 

> < 

> FEB ♦ 1982 < 

> < 
»»»»>«««<« 

1 



INTEGER BASIC 

by John Sharp 

A number of members have written in with 
questions ar problems about INTEGER BASIC. In 
the touching hope of cutting downon some of my 
work, here is a summary of the answers which 
will tell you all youwant to know about the 
problem. 

One of the most frequent problems is "I can't get 
some of the Integer programs to run. They just 
hang or go into monitor." This usually happens 
because the program overwrites INTEGER BASIC 
in RAM. 

The second most popular query is that the 
Integer Basic on the DOS 3*3 MASTER does not 
work. 

First let me say something about loading 
INTEGER BASIC into RAM, and secondly about 
how Inteaer Basic loads a program in contrast to 
APPLESOFT. 

On the DOS 3.3 MASTER which you should have 
received with your disk drive? or conversion kit f 
is a machine code program called INT BASIC* 
When you boot the disk the HELLO program looks 
to see if there is a RAM CARD (alias a Language 
Card) in slot zero. If there is it loads the 
program into the card. If there isn't* it does 
nothing. The program is meant to run only on the 
language card, if you try running it elsewhere, it 
will not work. Tryina to run it elsewhere means 
attemptina to BKUK XNT BASIC. It is passible to 
BLOAD INT BASIC r and you will find it will load 
at a location 1000 (hex). However, since it has 
been written to run at the very top of memory* 
(i.e. on the language card) it will not run. This 
would be like renumbering a BASIC program 
without renumbering all the GOSUBS, and GOTOs 
etc. 

So you haven't qot a lanauage card, what do you 
do. Well, on the BASUG INTRODUCTORY DISK is 
a binary program called INTEGER. If you BRUN 
INTEGER, when it has loaded it will then come up 
with the INTEGER BASIC prompt ">" and you can 
write in Integer or load a program from disk or 
tape. If you look at where the program has loaded 
(see Beginners Page in HARDCORE last year), 
you will find that it too is loaded at lOOO(hex). 
However, it has been relocated to run there and 
all the 'Gosubs' are correct now. But, lOOO(hex) 
sits in the middle of memory and this is where 
problems arise. 
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To see what the problem is let us look at where 
programs are loaded. An APPLESOFT program 
loads at SOI (hex) and then 802 etc, unless of 
course you tell it to load somewhere else (e.g. 
above the HI-RES pages) by Poking or otherwise 
altering the start of program pointers. An 
INTEGER program is different. It starts at 
HI-MEM and loads BACKWARDS. The end of the 
program is loaded first* Now if the INTEGER 
BASIC is in ROM» or on the language card then 
there should be no snaqs because the proqram is 
always below the INTEGER BASIC. BUT, if the 
introductory disk Inteaer Basic is used, AND the 
program is long, they collide. The actual program 
loads QK, but wipes out the tail end of the 
Integer Basic interpreter and althouoh all may 
seem all right initially, at some stage, the 
Integer interpreter needs to use part of the code 
that has been wiped out, So what happens? - it 
bombs into Monitor. 

Where do you go from there? On disk 11 in the 
library are a number of INTEGER BASICS which 
run at all sorts of places- a sort of Integer for 
allcomers. They are there for tape users as well, 
but I will come back to them in a moment. If you 
cannot find one suitable there, then you are just 
aoinq to have to buy an Integer card or a RAM 
card. Collision problems may be avoided, but you 
might still run out of memory because you are 
using up a sizeable portion of RAM if you are not 
using the INTEGER on a RAM or ROM card. 

So, that answers the problems above. There is 
one more, If you have the INTEGER BASIC 
PROMPT ">" and you tvpe "FP" you will be placed 
back in APPLESOFT and the* APPLESOFT "3" 
prompt will return* 

If you now type "INT" the following will happen. 
If you have a ROM card (INTEGERin ROM) then 
the Integer prompt will returni because DOS 
knows it is there and switches it on. If you have 
a language card AND it is loaded with Integer, 
the same thing will happen because as far as 
your APPLE is concerned they are the same thing 
at this stage. I say switch, because this is 
precisely what it does. The same memory 
locations are used and so the APPLE has to 
switch the APPLESOFT ROMS off and turn on the 
language card. 

If you have neither ROM nor RAM card then the 
message "LANGUAGE NOT AVAILABLE" will 
come up, Why, you may ask, when I just had it 
working. Answer! DOS has looked up to see if you 
have had a ROM or RAM card with INTEGER 
BASIC on it? since you haven't got one it says so. 
You can either rerun it from disk, or you can call 
the start of the program (CALL 1003 in the case 
of the Introductory disk version). 



There is one other INTEGER BASIC, David 
Bolton's RELOCATED INTEGER, which as a disk 
version, has had the DOS modified so that when 
you do type "INT" it starts up the RAM version 
of Integer instead of looking to see if there is a 
card there. 

If you are a tape user, on your Introductory 
Tapes is an APPLESOFT program which sets up 
INTEGER BASIC. You should" have this runnina 
with the INTEGER prompt up BEFORE you try to 
load an INTEGER BASIC PROGRAM, otherwise it 
will not load. These programs are numbers 16-18 
on the fourth side of the tapes. 



Why use INTEGER at all? This is yet another 
question. Firstly, it is a faster lanquaqe, 
because it does not have to do so much work with 
numbers, in sorting out floating paints. Secondly, 
there are differences such as a MOD function 
which can be useful in certain 
mathematical/logical handling of data, In other 
respects it is not really as useful. There is no 
string handling (with LEFTS, MID* etc); you have 
to dimension all strings! you have to be careful 
because all commands on a line are obeyed even 
if there is a not true condition in an IF.,. THEN 
statement, There are a few more minor 
drawbacks, which means that only the diehards 
use it these days, 

Finally INTEGER is spelt just so and not 
INTERGER - a truly horrible looking corruption. 



Q 



3 



c 

Ha. 
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tfel 85827 SIB© - dJohn Rogers 



Please also ask about 
computer- insurance 
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SO WAT-S_A 



by Ian Trackman 

The last issue of Hard Core included a number of 
articles containing listings of programs and/or 
routines written in 6502 machine code. 
Basic-only programmers might have had a 
problem since noted none of the articles - my 
own included - explained to the reader exactly 
how to enter the programs into his/her Apple. In 
justification! may I make three points. The 
articles are just that - magazine articles - 
written for computer-literate BASUG members 
and are not fail-safe instruction manuals 
designed for first-time users. Secondly, the 
authors - if I am typical - want to put their 
effort into the main content of the article 
instead of writing a series of loading and saving 
instructions. Finally, BASUG is now running 
introductory courses on machine code 
programming* 

Nevertheless, having said that, I have been 
asked to write this article. Its purpose is not to 
teach machine code programming, but to explain 
how to read, enter and save machine code 
programs published in Hard Core. 

The 6502 micro-processor at the heart of the 
Apple responds to a series of on/off electrical 
pulses. These cause it to ca^rry out the functions, 
such as additioni subtraction and comparison, of 
which it is capable. The code for each 6502 
operation consists of 8 bits* making up one byte, 
and is referred to as an "opcode" (short for 
"operation code"). 

To carry out an operation such as "Add 15 to 20 
and save the result in memory location $340", we 
need to give the 6502 two other types of 
information, numerical values (15 and 20) and 
memory locations ($340). By using the 
appropriate opcode, we can tell the 6502 that the 
following one or two bytes contain data - a value 
or an address - relating to that opcode, rather 
than another instruction* It's somewhat similar 
to a Basic command such as GET, which must be 
followed by a variable name, or PEEK, which must 
be followed by a memory address. 

For the convenience of programmers, the binary 
opcodes and data are expressed in hexadecimal 
(base 16) notation. If you enter the Apple's 
Monitor with a CALL -151 and then type 
F800.F87F <return>, part of the Monitor's 
opcodes and data will be displayed in hex. This is 
known as a "hex dump". Each line starts with the 
number of the first address, followed by the hex 
values of the contents of eight consecutive bytes 
of memory. There is no indication in the dump 
itself as to which bytes are opcodes and which 



are data. To find that out, you would need to 
refer to a table of 6502 instructions and decode 
each number, seeing whether it needs to be 
followed by none, one or two bytes of data. 

When we program in Basic, we hardly need 
concern ourselves with "memory management", 
that is* where exactly in the computer's memory 
the program and its variables will be stored. The 
Basic interpreter takes care of that for us. In 
machine code programming, there is no such 
luxury. The programmer has to decide where to 
store the program and its accompanying data, 
making sure that it won't be incompatible with 
anything else stored in memory. So we need a 
starting address or "origin" for our program. 

T. Tse's Nicelister on pages 26 and 27 of Hard 
Core for April 1982 is presented in the form of a 
hex dump. Its origin address is the first address 
of the listing, 8000. Being machine code, this is 
$8000 (hex) and not 8000 (decimal). That's an 
occasional trap for the unwary - location AA60 is 
obviously hex, but what about 800 ? If you aren't 
certain, convert the origin into both hex and 
decimal (see Hard Core of August 1981 for Hex / 
Dec converters). Then look at the memory maps in 
the Apple Reference Manual to see which number 
- hex or decimal - looks more sensible. 

To enter Nicelister, the first step is to give the 
Monitor the starting address of the programi 
Assuming that you are still in the Monitor, type 

;- 

8000 ! <no return> 
As you are in the Monitor* don't prefix the 
number with a $. If you do, the Monitor will 
reject it, after the next <return>, with a beep. 
(Not even a friendly "Syntax Error" message). 

Now start key-bashing. Type in each hex number, 
separated from the next by a space. Single 
numbers (00, 0D, 09, etc.) can by typed as 0, D 
and 9. As you can enter up to 255 characters (i.e. 
key-presses including spaces) between 
<returns>, you can type in several lines of hex 
numbers without pressing <return> at the end of 
each printed line. Don't enter the address (8008, 
8010, etc) at the beginning of each new line. For 
reasons which follow, I suggest that you enter 
exactly 8 lines of hex-dump at a time. As a 
warning against over-filling the keyboard input 
buffer, the Monitor will beep after 247 
characters. 

If you ignore the warning, you'll over-write 
earlier characters. After each <return>, start the 
next line with a colon, to tell the Monitor that 
you are continuing to put more bytes into 
memory. If you forget the colon, the Monitor will 
think that you are asking for a listing of the 
contents of memory locations and will respond 
after the <return> with something like h 
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20- 45 
F8- FC 
E6-91 

and so on. If you are fast enough* press <reset> 
before your original typing scrolls off the 
screen. Now type a new origin address followed 

by a colon. If you enter numbers in 8-line blocks, 
it's simply a matter of entering the address at 
the start of the correct block. Then move the 
cursor up and copy over your original typing. If 
you weren't fast enough and your original 
numbers have disappeared, you'll just have to 
re-type them. 

After twenty or so lines, you'll begin to realise 
that direct entry, or "hand-coding", is very prone 
to typing errors. I suggest that you check your 
work as you go. After every 8 lines, do your own 
hex dump and compare it with the printed listing. 
Far example, to check your typing Df the first 8 
lines of Nicelister, type ?- 

8000 . 803F Oeturn> 
If you have made a mistake in one byte, change 
itt For instance, if you entered B6 as the third 
byte of the third line, type !- 

8012 J D6 <return> 

If you have left a byte out or added an extra one 
in, you can shuffle the following bytes up or 
down by using the Monitor's memory move 
routine, but the quickest way is probably to 
re-enter the incorrect section. 

To continue, enter the address at the beginning 
of the next 8 lines, followed by a colon, and type 
the next block, until you have finally entered the 
whole program. 

You now have to save it. DOS needs to know the 
origin address and the length of the program. 
Fortunately, DOS accepts hex numbers (preceded 
by a * sign). The origin address is easy. As to 
the length, remember that a program starting at 
$800 and ending at $880 is actually *81 bytes 
long. Usually the subtraction sum "end address 
minus start address" should be easy to do, but if 
not, you can use the Monitor's own hex number 
subtraction facility. For example, if a program 
starts at $9D6 and ends at *B1F, type J- 

1F- D6 

which will give you I- 

= 49 

There is a "borrow" of $100. *B00 - $900 = $200, 
so that, taking into account the borrow and the 
last byte of the program, its length is $14A. You 
can now save the program by t- 

BSAVE <file name>, A*<hex origin>, L4<hex 
length> 



Working out hex numbers to make up a program is 
a very difficult way to talk to your Apple. There 
is a better method* called assembly language 
programming, in which the 6502 hexadecimal 
instruction codes are replaced by three-letter 
mnemonics. For example, the code for the 
hexadecimal command for subtraction is SBC. In 
the simplest form of assembly language 
programming, data (numbers and addresses) are 
still expressed as hex numbers. To enter a 
program, you need an "assembler" and to read it 
back you need a "disassembler". 

Let's start with the disassembler. From the 
Monitor, type F800L. This wall produce 20 lines 
of disassembled code. Apple's internal 
disassembler has worked out - from the 
bit-pattern of the opcodes - which bytes are 
instructions and which are data. Look at the first 
4 lines J- 

F8 0- 4 A LQR 

F801- 08 PHP 

F802- 20 17 F8 JSR *FB47 

F8 05- 28 PLP 

The first column contains the memory address, 
the second column contains one, two or three hex 
numbers, the third column contains the mnemonic 
opcode and the fourth column may contain data# 
In the above example, only the JSR ("jump to 
sub-routine") opcode requires an address in the 
fourth column. If you now compare this with the 
hex dump (FS00.F880), you'll see that the opening 
addresses in the first column and the hex bytes 
in the second column correspond. 

So, by entering the origin address (followed by a 
colon) and the hex bytes listed in the second 
column, you can now enter Les Budgen's program 
on page 21 of the last issue of Hard Core, This 
time, checking is easier. Not only should columns 
1 and 2 match the printed listing but so should 
columns 3 and 4. 

Next, we can improve the method of entering the 
program. Look at Les' program. We could enter it 
by typing 
300 ! A9 4C A2 18 

and so on, as explained above. Unfortunately, we 
can't type t- 

300JLDA #*4C LDX #$18 

etc. However, there is a way. If you have an "old" 
Monitor, you can use the built-in 
"Mini-Assembler". If you have an Auto-start 
ROM, you'll need a copy of the re-located 
Mini-Assembler from the BASUG program 
library. Instructions for using it are set out on 
pages 49 - 51 of the Reference Manual and I 
won't repeat them here. 
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When using the Mini-Assembler, it is not 
necessary to type the * sign to signify hex 
numbers, although you must enter all # signs 
(which indicate real numbers) wherever they 
occur. You need only one space between columns 
and, unlike the hex-dump method of entry, you 
must type a <return> after each line. Other than 
that, entering a program through the 
Mini-Assembler is a case of setting the start 
address and copying out columns 3 and 4 of Les' 
listing. 

The Apple disassembler tries to interpret every 

hex byte as part of a 6502 instruction. In reality, 
some programs contain variables or blocks of 
data which cannot be translated in that way. If 
the disassembler cannot perform its translation 
properly, it produces 3 question marks. Les' 
program contains such a data block and ??? 
appears at $314 and $316. You cannot enter these 
bytes through the Mini-Assembler and you have 
to go back to the hand-coding method. These data 
bytes are always single bytes in the 
disassembler listing. When you come across ??? 
in the listing, I suggest that you make a 
temporary entry in the Mini-Assembler at that 
address of the opcode BRK, which corresponds to 
the hex byte 00. After typing in the rest of the 
program, you can then alter those particular 
bytes to their correct values with the direct 
entry method. 

The "Mini" in Mini-Assembler means that it can't 
do everything that a big assembler can do* For 
example, using a full assembler, we can add 
comments into our programs, we can refer to 
variables and address by giving them names (or 
"labels" as they are called), we can enter text as 
ASCII characters and we can give instructions to 
the assembler as to how we want it to produce 
listings of the program. Assemblers for the 
Apple offer different facilities and there-fore 
their operating instructions (called 
"pseudo-opcodes" or "assembler directives") vary 
from one to another. This means that listings are 
non-standard. Nevertheless, they do have many 
features in common, so that it is still possible to 
enter programs using a combination of the 
Mini-Assembler and the direct hex entry method. 

Look at my Apple Writer Ramcard Patcher on 
pages 15 to 17 of the April Hard Core. The 
listing has now expanded to 7 columns wide. 
Columns 1 and 2, separated by a colon, are the 
address and hex code as before. The third column 
is the line number within the listing. It's not 
used by the program itself, but merely for 
reference purposes when listing and editing the 
program. 



The next column contains an address label. It's 
somewhat like a line number in Basic and we only 
use it when we need to refer to the line, such as 
in a "GOTO"-type command. The fifth column 
contains the familiar 3-letter opcode. It can also 
hold a pseudo-opcode, such as "ASC" in line 95, 
which tells the assembler that what follows is 
some text in ASCII. 

Column 6 holds addresses, numbers, variables 
and data and the last column is for comments* 

The program itself will usually start with a block 
of "equates" which assign labels to addresses 
and constants to be used in the body of the 
program. There will also be an ORG 
pseudo-opcode, giving the starting address of 
the program. 

There are three ways of entering such a program. 
If you have the same assembler as the author, 
then just copy the listing. (Please see my 
comments about < and > signs in the DOS Toolkit 
Assembler in Hard Core of March 1981). If you 
have a different assembler, well assume you 
know enough about assembly language 
programming to do any necessary conversion 
work. 

The second method is to hand-code the program. 
Look for the origin (ORG> and then copy the hex 
bytes from column 2. 

The third method is to use the Mini-Assembler. 
Here, you'll need to translate the labels and 
variables back to hex numbers. The easiest way 
is to refer to the hex bytes in column 2. You'll 
have to keep in mind that in 6502 code, 2-byte 
addresses are always referred to in reverse 
order, so that the low-byte comes before the 
high-byte. 

Let's look at my Patcher program in more detail. 
It starts with a title, fallowed a block of 
equates, then the ORG *9C00 statement at line 
31. This tells us where to start assembling. 
(Remember to relocate DOS before you begin !)« 

The first line, LDX #0, is straight-forward and 
can be typed into the Mini- Assembler without 
trouble !- 
300 5 LDX #0 

In line 36, we can ignore the label "GO.LOAD" 
for the time being. However, in column 6 f we have 
the label "TEXT", which needs translation. 
("TEXT" has nothing to do with the Basic 
command TEXT - it's just a name that I made up.) 
Look across to column 2 # where you'll see the 
three hex bytes «- 
BD 47 ?C 
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The first one always corresponds to the opcode 
(LDA in this case) and the next two are the 
numerical equivalent of the label "TEXT". 
Remembering to reverse the low-high order, you 
can now type into the Mini-Assembler 

LDA 9C47,X 

Notice that the " ) X M is not part of the label and 
must be copied exactly as listed. 

Another way of finding the correct value for 
TEXT is to look down column 4 until you spot it - 
on line 74, in fact* Then look across to column 1 - 
there is the address again - $9C47. 

The same idea is used in the next line (37), so 
that you'll be typing 
BEG 9C0D 

The next line (38) is slightly different. COUT is 
not a label within the program itself, but it 
appears in the equates list at the top. So we type 



JSR FDED 

In line 42, Hard Core's printer was left in 
English character mode and so the hash signs 
have been printed as pounds. That line will be 
entered as :- 

LDA #9C 

When we reach line 74, we've already seen that 
the Mini-Assembler can't cope with text. You'll 
now have to go back to the old direct entry 
method to put in the last few bytes of the 
program. 



If you list the program on the screen* columns 1 
and 2 should correspond, although the 
disassembler will split up the text lines (75 - 80) 
differently. You should also see the similarity 
between the opcode and data columns on the 
screen and in the printed listing. 

To close this article, let me add a tip about 
loading a machine code sub-routine from Basic. 
Of course, you can BLOAD it from within your 
Basic program. However, if it is short, you may 
want to POKE it in directly. There is a routine on 
page 77 of the DOS Manual, which creates a 
whole batch of POKE commands in your program. 
A neater way is to have a loop, such as !- 

10 FOR I = 768 to 780 
20 READ X 
30 POKE ItX 
40 NEXT 

50 DATA 43,5A...(the decimal values of the 
program) 

Put the machine code into memory in one of the 
ways explained above, then write lines 10 to 40 
in the normal way. Maw enter this immediate 
command t- 

PRIMT "50 DATA"; ! FOR I = 768 TO 780 : PRINT 
PEEK(I) ! NEXT 

The next line of yaur Basic program will appear 
on the screen ready for you to move the copy 
cursor over it, (Don't enter the last comma,) 

As I said at the beginning of this articlei I have 
not attempted to explain what the opcodes and 
pseudo-codes do. Perhaps you'll now be tempted 
to find out ! 



USING DOS FROM THE MONITOR 
AND IN MACHINE LANGUAGE 

By John Kleenan 

The following notes refer to DOS 3.2 on an ITT 
2020 with 48K. All numbers are in hex. 

To use DOS commands from terminal in monitor 
(e.g .CATALOG) 

3EAG or A851G hooks in DOS (e.g.after RESET) 
CALL -151 enters monitor for Basic 
It is also necessary to (or at least it works if 
you do so) 765FF (i.e.put FF into location 76) 

To trap DOS errors: 

Put address of error-trapping routine in to lo-hi 
format into locations 905A,905C,905E 



ine error trapping routine will then be called 
with the DOS error code as per BASIC QNERR 
will be in the X-register. 

To suppress DOS error messages! 
Overwrite A6D8!F015 



To use DOS in machine-code programs is similar 
to Basic- you just preface DOS commands with 
control D. Problems arise with text-files? these 
can be got round by 7610 

33:3F (this is putting the character '?'in the 
monitor prompt register) 

The above works through I am not always quite 
sure why# in particular the use of location 76 
(hex) is obscure. 
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village 
computer 

services 



WORD PROCESSORS 

Magic Window £60.00 

Basic Mailer £40.00 

Superscribe £80.00 

letter Perfect £100.00 

Dan Payrnar LCA2 £39.00 

Zardax £160.00 

Wordstar £160.00 

Mailmerge £65.00 

BUSINESS/UTILITIES 

Visicalc £100.00 

Visidex f 100.00 

Visifile £ 1 30.00 

Visitorm £78.00 

Visipak £325.00 

Visitrend/Visiplot £125.00 

D.B. Master £125.00 

D.B. Master Utility £62.00 

Data Factory £98.00 

Ramex 1 6K Card £75.00 

32K Saturn Ram Card £130.00 

Locksmith 4.1 £65.00 

The Inspector £35.00 

Accu-Shapes £24.95 

Expediter II £75.00 

Zoom Grafix £24.95 

U-Z80Card £95.00 

Brain Surgeon . £30.00 

Tasc Compiler £85.00 

VidexVideoterm £180.00 

Dos 3.3 Toolkit £40.00 




TG Joystick £33.00 

Softsiep £24.95 

Super Disk Copy II £20.00 

Memory Manager C20.00 

GAMES 

Bug Attack £14.95 

Wizardry I £26.00 

Wizardry 2 (needs 1) £22.00 

Time Zone £54.00 

Ultima £21.00 

Wizard & Princess £17.50 

Zurkll £22.00 

Gorgon £ 2 1 .00 

Raster Blaster £16.00 

Flight Simulator £20.00 



Apple Panic £14.95 

Space Eggs £14.95 

Snoggle £13 00 

Epoch £19.00 

Hadron £19.00 

Beer Run £18.00 

Autobahn £14.95 

The Prisoner £16.20 

Castle Wolfenstein £15.20 

Phantoms Five £15.50 

Cyber Strike £15 50 

Shack Attack £15.50 

Sargonll £20.00 

Cranston Manor £17.50 

Firebird £15.20 

Alien Typhoon £14.00 

Olympic Decathlon £14.95 

Tawala's Last Redoubt £14.95 

Sneakers C17.0O 

Russki Duck £18.00 

Pegasus II £14.95 

Tigers in the Snow C22.0O 

Threshold £20.00 

OO-Topos £14.95 

Genetic Drift £15.20 

Robot War £22.00 



We also stock the following: 

Accutrack S/S S/D £1.65 each 

BASF S/S S/D £1.65 each 

3-M S/S S/D £1.90 each 

Dysan S/S S/D £2.30 each 



Ribbons - all makes 
Print wheels 

All makes plus other formal disks 
Monitors 



Add £2 for plastic library boxes. 

Postage end packing FREE — please add 1 5% 
VAT to your order. 

We stock the full range of Apple related 
books 



This is just a small sample of what we have 
in stock - please ring or write for price list 
and further details. We also sell Apple II 
carrying/flicjht case. 

We are Consultants for small businesses. 
CALLERS BY APPOINTMENT ONLY 



Suite 1, 20 High Street, Highgate Village, London IM6 5JG 
Tel: 01-348 0306 
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Accutrack Disks . . . 

Because data reliability 
is the important difference 
in disk construction. 




Anatomy of a disk. 

Flexible disks are simple information 
storage devices consisting of o 
magnetic disk enclosed in o semi-stiff 
protective jacket The disk rotates 
within the jacket while magnetic 
recording heads on your data or 
word processing systems "read" or 
"write" information on the disk's 
magnetic surface Since disk 
operation is simple, it's relatively easy 
to make one that works But building 
in reliability is something else agairS It 
takes specialized technology -to build 
disks that operate flawlessly over an 
extended period of time. 

What counts in 
disk construction. 

Key design objectives for a disk ore 
listed below. How well a disk 
measures up to these objectives 
relates directly to the throughput, 
accuracy and overall costs for your 
data or word processing system No 
disk measures up better than 
Accutrack 

• The magnetic coating must be 
precisely formulated ond uniformly 
applied Imperfections as small as five 
millionths of an inch cause signal 
dropouts, data checks and wasted 
processing time as well as errors 

• The disk surface must be 
absolutely clean, totally flat and 
permanently lubricated to prevent 
excessive rjeod wear with 
subsequent signat degradation and 
eventual loss of information (This is 
the most critical objective and the 
one that's most often compromised 



since poor operoting resutts take a 
while to snow up It's also the area 
that most effects the long term 
inability of your data) 

• The disk must be free to rotate 
within its jacket without internal drag 
to avoid further data checks, 
excessive processing times and 
errors 

• The jocket must protect the disk 
from external contamination and 
damage It should also remove 
microscopic particles of debris from 
trte disk surface before they con 
damage the d*sk 

Why you'll never find 

the best disk bargain 

in the bargain basement. 

While there's little apparent 
difference between other disks ono 
Accutrak. the performance 
differences can be substantial Simply 
stated, an Accutrack disk is premium 
priced But the protection it gives 
your information the reliability it 
provides to your operations ond its 
substantially longer life make it the 
best disk buy After all. the real cost 
of your operations is constructing 
and processing the data stored on 
the disk - not the disk itself It doesn't 
make sense to trust that data to 
anything but the best disk 
Accutrack 



BASUG BULK BUYING - 500oft PRICE FOR IDs 
£17=50 inci FREE LIBRARY CASE! 

(ADD 50p POSTAGE / PACKING) 



BRITISH APPLE SVSTEfTlS USER GRDUP 

P.O Box 174. Watford W02 6NF 
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ISED DISKS 

by Rex M.F .Smith 



DOS 3.3 disk personalizer will add an eleven 
character string of your choice to Track #2» 
Sector #2 at Hex $AF. This message replaces 
'DISK VOLUME' and is displayed every time you 
boot the disk. The idea came from Windfall 
January, 1982, and the information on how to 
patch the disk came from 'Beneath Apple DOS'. 
The routine will relocate itself at $3000 and load 
the sector at $2000. I chose these locations as 
the routine to call RWTS can then be used as in 
the DOS manual, page 94ff. It is probably not a 
good example of how to use RWTS. It also 
changes the DOS RAM image of the sector as i 
found that DOS does not read the information off 
the disk* but supplies 'disk volume' from RAM at 
46011 decimal. Now when you call the catalog up, 
your message will appear (for each disk until you 
reboot with a different message). The 
programme exits by calling the catalog and thus 
displaying your message. 

If you wish to patch a master disk in this way, 
master the disk first and then use the routine. 
To add the patch to other masters, BLOAD 
'MASTER CREATE' and change the disk for the 
master patched, then enter the monitor and type 
800g to execute 'MASTER CREATE' which will 
load your patched master DOS from the switched 
disk. Easier still, use FID to put 'MASTER 
CREATE' on the patched master disk, then use 
that to master further copies. If you attempt to 
master afterwards, the patch will be overwritten. 



I have appended the monitor routines which save 
and restore registers as I found the programme 
slowly destroyed DOS without them. This patch 
appears to have cured the problem. 

1 TF PEEK (101) = 8 THEN POKE 
103, 0: POKE 10^,48: POKE 122 
88, 0: PRINT CHR* (13) * CHR* 
<4>|»RUN DOS 3.3 DISC PERSON 
ALIZER" 

5 TEXT I HOME 

10 REM xxxxxxxxxxxxxxxxxxxxxx 
x THIS PROGRAM WILL * 

* REPLACE THE H0RDS ft 
x ' DISK VOLUME' * 

* WITH A STRING OF * 
x YOUR CHOICE ELEVEN * 
x CHARACTERS LONG * 

XXXXXXXXXXXXXXXXXXXXXX 



20 REM xxxxxxxxxxxxxxxxacxxxxx 

* USES THE RWTS FROM * 
x CODE STORED AT HEX X 

* LOCATION 3000 AND * 
x STORES THE SECTOR x 

* AT HEX 2000-20FF X 
xx*:xxx)i(xxxxxxxxx:*xxxxx 

30 REM xxxxxxxxxxxxxxxxxxxxxx 
x IT CHANGES TRACK 2 x 
x SECTOR 2 BY POKING X 
x THE USER STRING X 
x (BACKWARDS) INTO * 
x HEX OFFSET *AF OF x 
X THE SECTOR STORED x 

^\ Si «4C j4C iflC IK ^fr! 

4 REM xxxxxxxxxxxxxxxx*xxxxx 



x EACH BYTE MUST BE 



x 128 + ASC VALUE OF x 
x THE CHARACER USED x 
x RWTS IS THEN USED x 
x AND REWRITES THE x 
x DATA TO THE DISC x 
x*x**x*xxxxxxxxx*xxxxx 
50 REM xxxkxxxxxxxxxxxxxxxxxx 
x IF YOU USE "MASTER 'x 
x FIRST, THIS DISC x 
x CAN BE USED BY THE x 
x MASTER CREATE PROG * 
x BY BLOADING IT x 
x THEN SWITCH DISCS x 

3(C ^§C 5(t 34C HC <4C UK *4( 3^ 3^1 

60 REM IK********************* 

* AND CALL MASTER BY * 

* 800G FROM MONITOR * 

* MASTER WILL THEN * 

* USE THE DOS WITH * 

* YOUR MESSAGE TO * 

* UPDATE THE DISC * 
xxxxxx*xxxxxxxxxxxxxxx 

65 DIM AtdDJ DIM frill) 

7 HOME t VTAB 5 J HTAB 31 INPUT 

"WHICH SLOT IS THE DRIVE IN 
? "ISL 
75 SL a INT <SL> 

8 IF SL < 1 OR SL > 6 THEN 70 

9 UTAB 7i HTAB 3 J INPUT "WHICH 

DRIVE IS THE DISC IN ? " } DR 
100 IF DR < 1 OR DR > 2 THEN 90 
110 VTAB 9t HTAB 3t INPUT "WHICH 
SLOT DID YOU LAST USE ? "jP 

SL 

115 PSL = TNT (PSD 
120 IF PSL < 1 OR PSL > 6 THEN 1 
10 

130 VTAB 11 t HTAB 3: INPUT "WHIC 
H DRIVE DID YOU LAST USE ? " 
JPDR 

1«0 IF PDR < 1 OR PDR > 2 THEN 1 
30 

160 HOME : VTAB 51 PRINT " 

PRINT 

"XXXXX******" 

180 VTAB 5t PRINT "MESSAGE (11 C 
HARACTERS > ?" J 
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190 get a*sa*( pos (a) 24) - a 
*: print a*;: if pos <a> < 

36 THEN 190 
200 PRINT : INPUT "IS THE STRING 
O.K. ?"JY*: IF LEFT* <Y*,1 

) ■ " Y" THEN 220 
210 FOR N =5 1 TO li:A*(N) = ""J NEXT 

NJ GOTO 160 
220 FOR N = 1 TO 1 1 : A<N) ■ ASC 

<A*<12 - N> ) + 128J NEXT N 
500 ADRS m 3072: REM *0C00 
520 POKE ADRS, 169: POKE ADRS + 1 

,12 

540 POKE ADRS + 2, 160 J POKE ADRS 
+ 3,10 

560 POKE ADRS + 4*321 POKE AORS + 

5,217: POKE ADRS + 6,3 
580 POKE ADRS + 7,96: POKE ADRS + 

8,0 

59 POKE ADRS +9,0 

60 POKE ADRS + 10,i: POKE ADRS + 

11, <SL * 16) 
620 POKE ADRS 12, DR: POKE ADRS 
+ 13,0 

640 POKE ADRS + 14,2: POKE ADRS + 
15,2 

660 POKE ADRS + 16,32t POKE ADRS 
+ 17,12 

680 POKE ADRS + 18,0? POKE ADRS + 
19,32 

700 POKE ADRS * 20, 0: POKE ADRS + 
21,0 

720 POKE ADRS + 22 , 1 : POKE ADRS + 
23,00 

740 POKE ADRS + 24,00; POKE ADRS 
+ 25, (PSL * 16) 

760 POKE ADRS + 26 ♦ FDR 

765 POKE ADRS + 27 , : POKE ADRS + 
28, 0: POKE ADRS + 29, 0: POKE 
ADRS + 30, 0: POKE ADRS + 31 # 


780 POKE ADRS * 32,00: POKE ADRS 
+ 33,1 

800 POKE ADRS + 34,239: POKE ADR 

S « 35,216 
820 CALL ADRS 
840 FOR N - 1 TO 11 
860 POKE 8192 + 175 + N , A < N ) 
870 POKE (45999 + N) ,A(N> 
880 NEXT N 

90 POKE ADRS + 22,2: POKE ADRS + 
23,0 : POKE ADRS + 24, 01 POKE 
ADRS + 25,<SL * 16): POKE AD 
RS + 26»DR 

940 CALL ADRS 

960 PRINT CHR* <4 ) } "CATALOG" 
970 PRINT : PRINT "DO YOU WISH T 

ALTER ANOTHER DISC ?"J 
980 GET Y*: IF Y* < > "Y" THEN 

1000 
990 RUN 

1000 PRINT ; PRINT : PRINT "PROG 
RAMME POINTERS ARE BEING RES 
ET" 

1010 PRINT CHR$ (4);"FP" 



By Jurgen Wolda 

(first printed in USER Magazin Nr 5, 81, the 
magazine of AVGEf the German user group i 
Translated by Tony Williams) 

Read on all ye who are too lazy to want to carry 
on with the drag of removing the write protect 
tabs from disks and replacing them after your 
priceless programs are writteni 

This contribution to the magazine describes a 
cheapo solution open to all owners of a soldering 
iron, a drill and a smattering of DIY skills 

Beneath the left disk guide rail in the drive is a 
microswitch which reads the 'write-protect' 
cut-out in the disk. If you break one of the wires 
leading to the microswitch you kid the system into 
believing that the cut-aut has been covered and 
so writing to disk is no longer possible! 

By now connecting this break point to a small flip 
switch on the front panel of the drive you can 
save yourself all that sticky messing about with 
tabs. 

So much for the theory, now for the brass tacks. 

The first thing to do is systematically dismantle 
the drive. That sounds worse than it is, since only 
eight screws have to be removed in all. The first 
four can be found on the underside of the drive. 
Once removed the drive cover can be slid off (to 
the rear!). The next four screws secure the black 
frontal panel to the metal chassis of the drive and 
are located to left and right of the panel. 
Unscrew these and remove the 'In Use' diode 
light. Now drill a hole in the panel next to or 
above the diode light big enough to take your 
switch, and fit it. Next solder two wires from 5 to 
7 cm long to the switch and slip two lengths of 
insulating sheath over each. Now cut the wire 
leading to the drive's microswitchf strip both ends 
and solder them to the wires coming from your 
switch. Finally push the insulating sheath over 
the joins. Replace and screw down the frontal 
panel. After replacing the diode light the drive's 
housing can be slid back on and secured with the 
screws. End of operation. 
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POLISHING THE APPLE 
(or how to construct and install a 
lower case keyboard and display 
unit) . 

by Peter Blair 

The reasons. 

One of the few annoyances of the 
Apple II is the lack of lower case 
and proper shift key operation. The 
keyboard enhancer from Videx is a 
possible solution but an expensive 
one. Other modifications seem to 
sacrif i ce some compatibi 1 i ty with 
existing programs. 

The problem therefore, was to 

provide my Apple with full lower 
case cheaply and simply and 
preserve all the existing display 
features. The circuit designs which 
follow were the result. These have 
been thoroughly tested and are 

installed and working on my own 
Apple (except the pre— revision 7 
display circuit). They are simple 
to construct and require no 

modification of the Apple circuit 
boards except the addition of a few 
wires. One minor point is that 
there are no true descenders 

possible because of the way the 
Apple structures the text screen, 
but this does not make a lot of 
difference once you get used to it. 

The logical approach. 

Ignoring the fact that the Apple 
software would convert lower case 
input to upper case I decided that 



the first step was to provide a 
full upper /lower case capability to 
the existing keyboard plus a 
correct shift key operation and a 
shift-lock key. To simplify this 
and avoid an extra switch I used 
the SHIFT and CTRL keys together to 
give shift-lock. 

The diagram FIB. 1 shows the logic 
circuit used. If both the SHIFT and 
CTRL keys are pressed together the 

flip-flop IC2a changes its output 
state. When the Q output is low the 
keyboard is in normal Apple upper 
case only mode. If the Q output is 
high then lower case is enabled , 
and the LED lights to indicate 
this. In this mode the circuit 
examines bit 6 of the keyboard 
output and the state of the shift 
key. If bit 6 is high then a letter 
key has been pressed. If the shift 
input is low then the shift key has 
been pressed and bit 5 is left 
unchanged, otherwise bit 5 is 

inverted and the letter becomes 
lower case. Since pressing the 

shift key changes the keyboard 

encoder output, you can still 

access every character on the 

keyboard except three when in lower 
case. These are the upper case M, 
N, and P since these keys give 
punctuation characters when 

shifted. A software fix for this 
minor irritation is given later. 
Display changes. 




ftE 7 fcOARD SECTION ~ LCG.C 
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The logic controlling the display 
is shown in FIG.2. The circuit 
detects when a lower case letter or 
punctuation (codes EO to FF Hex) is 
being output by looking at bits 6 
and 5 o-f the output data. Then i4 
bit 7 is high, the logic enables a 
lower case character generator and 
disables the output o-f the normal 
character generator. If upper case 
is output the opposite happens. 
Finally, if bit 7 is low then 
either -flashing or inverse 

characters are required and the 
normal generator is enabled. This 
means that it is not possible to 



your Apple uses the 2513 character 



display inver 



lower case 



and 



-flashing lower case must be done 
with software, but gives absolute 
compatibility with all existing 

software without requiring a 

display change-over switch. One 
extra bonus is that POKE— ing 

control character codes to the 
screen produces a range of special 
characters. 



the main board then 
section of the new 
be laid out as FIG. 4. 
the two circuits are 
i ndependent al though 
the same board for 



generator on 
the display 
board should 
Notice that 
completely 
bui 1 t on 
convenience. 



Start by inserting the IC sockets. 
If you do not use sockets for the 
TTL then leave soldering the IC's 
until last, BUT YOU MUST 

USESOCKETS for the char acter 
generators since solderi ng their 
pins will invalidate any guarantee. 
Next make all the wire links using 
solid core insulated wire. Then 
insert the resistor, capacitors and 
transistor and solder in place. 
Solder connecting pins into the 
board for the connections marked 
SHIFT, CTRL, DL6, and DL7 (the last 
two are only required on the FIG. 4 
circuit), and also for the LED 
connections. 



Construct i on. 

The parts required are given in the 
list at the end of the article. 
Having obtained these, then first 
you must check which version of the 
Apple you have. The revision 7 
board uses a custom programmed 

character generator ROM (actually a 
mask programmed 2716) while the 
manual gives the character 

generator as a 2513 type. FIG. 3 
shows the complete vero— board 
layout for the revision 7 Apple- If 



Using ribbon cable make up the 16 
and 24 pin header plugs, and then 
connect the other end of the cables 
to the board. The cables will need 
to be around 18" long. Note that 
the plug pin numbers are given for 
the connections from the board to 
the 16 pin header p but for the 24 
pin plug it is Just a pin for pin 
correspondence between the on-board 
socket and the plug. Also, for the 
24 pin plug, Mires are only 
required where indicated by a small 
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circle on the diagram FIG. 3 or 
FIG- 4, in particular NO CONNECTION 
is to be made to pin 18 of the plug 
in the FIG. 3 version, or to pin 11 
■for the FIG. 4 version since these 
are the chip enable pins. Now make 
all the track breaks that are 

required (marked by X in the 
diagram) but be careful not to miss 
any or to break any additional ones 
since some connections are made by 
direct link between IC pins. Lastly 
install all the chips except IC7 
which must first be removed from 
the main board. Ensure that all 
IC's have the indent loacating pin 
1 to the top of the board as in the 
diagram. 

Installation, 

Disconnect the Apple from the 
supply and remove all peripheral 
card^ from their slots noting where 
they go. Turn the Apple over onto a 
cloth covering your work bench. 
Carefully remove the four screws 
from the bottom front edge noting 
what they look like. Now remove the 
six screws around the outside 
bottom edge of the Apple. DO NOT 
REMOVE ANY OTHER SCREWS. Hold the 
top and bottom tightly together and 
turn the Apple right way up. Gently 
raise the front edge and remove the 
keyboard connector from its socket. 
The top may then be removed 

completely. Locate the character 




generator at location A5 and 

carefully remove it. Fit this to 
the new board as IC7. 

The extra wires should now be 
attached as follows. Turn over the 
keyboard section of the Apple so 
that you are looking at the rear of 
the encoder board. Cut two lengths 
of wire about 12" long in different 
colour insulation. Locate the CTRL 
and SHIFT keys. These have a common 
connection which is to ground, with 
i ndependent output connect i ons. 

Trace these back to the plug 
betweeen keyboard and encoder and 

carefully solder one wire to each 
connection at the back of the 

encoder board. On my Apple these 
were pin 3 for CTRL (or you could 
connect at the slide switch 

terminal), and pin 24 for SHIFT, 
but you should check this first. 
Make certain that these additions 
do not loosen or short any the 
existing connections. For the 
display there are no additional 
connections unless you are using 
FIG. 4. To make these proceed as 
follows. Locate chip Bll on the 
main board and carefully solder a 
wire to pin 12 for UL6. Similarly 
connect a wire to pin A of the chip 
at B13 for DL7. Note that pin 1 of 
all chips is indicated by a white 
dot on the circuit board adjacent 
to the chip. 

— 54 Sa_ *1 JUiJ fe> es M J 

ji ■ ■ / > 

)■ ••../.-*.■•. 
* •■•/ 
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Mount the new board on top of the 
power supply case (at the rear left 
of the Apple) with the keyboard 
cicuitry closest to the keyboard. 
To do this use a couple of 
double-sided sticky pads, one on 
top of the other, at each corner of 
the board- Make sure the soldering 
on the underside of the board does 
not touch the power supply case. 
Plug the 16 pin header into the 
keyboard socket at location A7 on 
the main board making sure pin 1 is 
in the right position- Plug the 24 
pin header into the socket you 
removed the character generator 

from at location A5 again getting 
pin 1 in the right place. 

The LED must be fitted now. Connect 
two insulated leads of different 
colours to the LED leads. These 
should be about 24" long- Note 
which wire connects to the cathode 
of the LED, which is the left hand 
lead when looking at the indented 
circle on the package. Twist the 
leads together but make sure they 
do not short. Gently prise up the 
cover on the power on light on the 
keyboard. Beneath you will see a 
bulb in a mounting with four pegs. 
Carefully break off the upper peg 
with a needle nose pliers. Feed the 
LED wires through the case top in 
front of the bulb and locate the 
LED against the bulb. This is shown 
in FIG. 5. Press the cover back in 
position. 



Fit the top of the case back on the 
Apple making sure that the existing 
keyboard plug and your additional 
wires are all available- Fit the 
plug from the keyboard into socket 
SKT1 on the new board. Solder the 
SHIFT, CTRL, DL6 and DL7 leads to 
the pins on the new board. Finally 
solder the LED leads to the board 
with the cathode going to the pin 
connecting to the resistor Rl . 
Testing. 



t the new 
power and 



It only remains to t 

board, so reconnect 

switch on. If the Apple beeps then 
OK so far, if not you have short 
circuited a power supply connection 
somewhere in your additions. 

Re-check your connections and make 
sure all IC's and plugs are fitted 
the right way, with no bent or 



damaged pins. If the Apple 

initialises correctly then you may 
test the board by typing something. 
It should appear that nothing has 
been changed at the moment and the 
Apple should still operate normally 
and respond to control characters 
as usual. If this is not so then 
again a short circuit or 

incorrectly fitted IC will be the 
probl em. 



To test the lower case capabiliti 
the fallowing two line program will 
suffice: 

lO X=PEEK ( — 163B4) : IF X<127 THEN 10 
20 PRINT X:POKE -16368,0: GOTO iO 

This will display the code of any 
key pressed (with the high bit 
set). Pressing SHIFT and CTRL 

together and releasing them will 
release the shift lock and the 
codes will change. Pressing shift 
will give upper case codes but will 
not affect the shift lock. To lock 
back into upper case press SHIFT 
and CTRL together again. 

To check the display, just poke the 
upper case codes (224 to 255 



decimal) to the screen. 

and inverse modes should 
as normal . 



The finishing touch 



Flashing 
itill work 



As I stated earlier, three upper 
case codes are not available when 
the shift is unlocked. This may or 
may not be an annoyance to you. If 
it is then a simple modification 
and some software will alter things 

M, N, and P 



so that 
will be 



the upper cai 
given when these keys 

shifted but at the expense of 
* f 3, and 5) symbols. 



the 



To make this modification add a IK 
resistor in the position indicated 
by Rx on the new board. Then 
connect a lead from the point 

marked <S> to pin 4 on the game 
controller socket on the main board 
<the PB2 input). This pin will now 
be high when the keyboard is upper 
case only and low when the shift is 
unlocked. The short machine code 
routine which follows will then 
test this and correct the output 
when necessary. The routine is 
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fully relocatable and should be? 
called a-fter reading a keypress- 
Final ly I have worked out patches 
for using this lower case 

modi f i cat i on wi th Appl ewri ter and 
these are also given below. These 
incorporate the key testing routine 
so that all alphanumeric characters 
are available when the shift is 
unlocked. 

Patches for use with Applewriters 
TED I TOR: 

Overwrite the bytes at »0806 to 
080B with 4C 20 18 

At *086A and *1537 overwrite the 
JSR *1501 with EA EA EA (ie three 
NOP's) 

At 0A12 alter the CO to 20 . This 
will allow the sequence ESC ESC 
CTRL C to still perform a correct 
case change. 

Using the monitor enter the 
following code starting at *1B20 
* 1820s AD 00 CO 10 FB 2C £3 CO 30 OF 
C9 EO BO OA C9 DD BO 04 C9 CO DO 02 
49 10 C9 8E DO 02 A9 DB AO 02 88 DO 
FD SD 10 CO 60 



You can now save your new version 
of TED I TOR with BSAVE 

TED I TOR , A*803 , L* 1 045 

PRINTERS 

At OF56 chanae El to Ai 

At 15DF change EO to AO 

At 15E3 change FO to BO 

At 15E7 change FA to BA 

At 15FC change FO to BO 

Replace the instructions starting 

at * 1 7 08 with the following 

*12D8:29 7F A6 57 FO 02 09 80 60 00 

Now save the new version using 

BSAVE PRINTER, A*803,L*lO20 
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Routine for upper case M,N and P when shift is unlocked. 



ENTRY POINT. 



CHANGE 
OUT 



QTT 






63 CO 


■ 


Test for shi-ft lc 


jck 


DM T 
CM i X 


ni it 


30 


OF 


■ 


Locked so forget 


it 


PMP 




C9 


EO 


P 


Lower case *? 




BCS 


OUT 


BO 


OA 


; 


Branch if yes 




CMP 


#*DD 


C9 


DD 


i 


M or N keys ? 




BCS 


CHANGE 


BO 


04 


i 


Fix if yes 




CMP 


#*C0 


C9 


CO 


5 


P key ? 




BNE 


OUT 


DO 


02 


; 


Leave i f not 




EOR 




49 


lO 


i 


Alter MNP codes 




RTS 




60 











PARTS LIST 



IC1 74LS14 Hex Schmitt Inverter 

IC2 74LS76 Dual JK Flip Flop 

IC3 74LS132 Quad 2 input NAND Schmitt trigger 

IC4 74LS02 Quad 2 input NOR gate 

IC5 RO-2513 LC Lower Case Character generator 

IC6 74LS00 Quad 2 input NAND gate 



Resistor Rl 150 Ohms 0.25W*tt 

Capacitors C1.C2.C3 0.1 uF 12volt working 

Transistor Ql General purpose NPN type BC548 <BC108,BClO9 
also suitable- ) 

LED Rectangular type , colour Red (Available from MAPLIN) 

Plugs Solder type Header plugs- 1 required 16 pin, 1 
required 24 pin- 
Sockets. Low pro-file DIL sockets 4 required 14 pin, 2 
required 16 pin, 2 required 24 pin 

Note that the character generator is available from 
TECHNOMATIC Ltd who advertise in the computing press. 

You will also require a piece of vero-board <copper clad 
type) 69 holes x 34 tracks on 0.1" matrix- This should be 
available from any large electronic component suppliers. 

The approximate cost of components is £l5 - il6- 



SUPPORT YOUR LOCAL ADVERTISERS ! 

Journal is expensive to produce and distribute, but i 



provided free to weMbers as a benefit of ne«bership 

In order to afford to continue this policy we need 
advertising to defray these costs* 

So DEALERS 1 — please advertise with us — the rates are low 
and we provide a select audience of active Apple users* 
And MEMBERS ! - persuade your local dealer to advertise - 
wherever you buy from advertisers tell then you "saw it in 
Hardcore" — 
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MICROS, , prc 

1 Branch Road, Park Street, St. Albans. 
Tel: Park Street (0727) 72917 

are pleased to announce their 
appointment as distributors of 

BLUE CHIP 
SOFTWARE 



SUPER EDITOR £22.50 

Super Editor is an essential toot (or anyone writing programs in 
Applesoft or Palsoft. Using a simple command format, this 
mochine code routine will Gpccdity list out every program line which 
contains a Basic command, function, variable or string designated by 
the user, highlighting it in inverse characters. Super Editor also enables 
the user optionally to substitute any other command, function, variable 
or siring for The item found, whatever their respective sizes. 

• Remains in momory whilst programs are loaded and saved 

• Reduce long descriptive variable names in final versions of programs 

• List every occurence of a designated variable for debugging 

' Check all GOTO. GOSUB and THEN references before deleting a 
line 

• Change integer arrays to real arrays and vice versa 

• Convert Integer programs to Applesoft and vice versa 

SUPER TRACE £22.50 

Super Trace is a high-speed 650? machine-code utility routine for 
use in debugging Applesoft programs. As each of your program 
statements is executed, it is displayed at the bottom of the screen, 
together with the values of any variable types or functions that you 
may have pre-seiected 

" Programs can be written, loaded and edited without affecting 

Super Trace 
" Does not interfere with DOS 

• Can he- invoked and disconnected as often as required during 
program run-time 

• Simple to use. Run time control by single keystrokes 

• Optional display of all statements or only statements containing 
selected variable types or functions 

" Variables highlighted In inverse display and their values displayed 

• Normal screen display not affected 

• 6 run-time speed settings plus instantaneous stop and single-step 
" Optional review of previous 10 program statements without 

destruction of screen display 

Also available' 
THE PACKING SUITE £22.50 

and Svmdjis the Symbolic Disassembler C 22.50 



ANY TWO £40.00 - ALL FOUR FOR £75.00 



NEW! 



EXTENDED MONITOR 

Written by Colin Richardson 

X M0N extend* fh« Apple ll Syttam Monitor lo one. a numb., of new commands 
tor example — 

— S — single step 

- T — trace 

~ M improved move command 

- (CTRL R - — ralocaia mech.ne language pfOo«em» 

— tCTRL-F • — comprehensive linrl command 
plus many mora 

Powariut naw adding features ara provided, and text ue<ue two can now be used 
in evenly The «ama way •* P»8« one 

XMON comas with comprehensive documentation, makmy it bolh effecl've and 
simple to use 

£22.00 INCL VAT 



BUSINESS BASIC 

Now you con hove APPLESOFT with the features APPLE left out 
Formatted output. Programmable TAB fields. Bi-Directional Scrolling. INPUT in 
strings. DISC store/recall commands giving 3 fold speed increase and up lo 3 
fold apace reduction, Direct access to disc sectors. 'HELP' command for 
debugging. 'SCREEN" or 'PAGE' output. INCLUDES the MINI ASSEMBLER 
REQUIRES A I6K RAM cord for -tee £28 



EPSON OWNERS 

Are you en APPLE owner with an MX-80 or MX-100 printer? 

Are you having trouble; using VISlCALC. GENERAL MASTER or other eueh 
software which conflicts with your EPSON TYPE II interface card? 

than w« can help you with a replacement ROM to go on your card which now 
allow* the atendard APPLE parallel interface commands to sal up your printer 
correctly. For example CTRL-1 80N will tet the column width. 

There is no need to POKE numbers into odd locations. The .card euppons 
graphics and uaes simple commands suoh at CTRL I 6 for default printing of pagn 
1. or CTRL-I GD2 for a double sire print of page 7 

Reulet*ment ROM for EPSON TVPE II APPLE INTERFACE CARD . . -C11 
COMING SOON. A BOOK TO TEACH YOU HOW TO USE THE EPSON. 

OMNIDOS 

OMNIDOS is a diSK wrwen wnen oooted allows vou to make access to e.thor 13 or 

10 sector disks using EITHER or DOTH formats SIMULTANEOUSLY 

••Thia meens there no need to use Muffin, etc Ynudn not need to know which 

format th* disk is in. YOU DO NOT HAVE TO SWITCH in any way (software or 

hardware), the DOS does everything for you. 

"Takes up NO EXTRA. MEMORY SPACE 

OMNIDOS «l*o he* a Utility program on the disk which allows you to customise) 
your OOS to: »• 
" create rusks which will boot on either 3 2 or 3.3 systems leaving you in a 3.2 
environment. 

••CHANGE DOS commands, error ma«agei in momory or on slave or master 
disks. Gives some program protection. 

"RELOCATE OOS for exemple low down to leave space lo< » routine at the top of 
memory. 

"Preoare DATA DISKS with etl the necks available to the uaor 

• • PART INIT d isks to restore DOS io a disk v ou have corrupted hy tiarting to INIT 

the wrong disk 

•* MOVE DIRECTORY io make copying difficult 
"22 MENU OPTIONS mall. 

OMNIDOS DISK - DOCUMENTATION «2 

TREE SORT 

TREE SORT ie a high-spearl utility to allow vou to add le>t suiting <° your 
program* from date in APPLESOFT arrays 

FAST rreani 1000 items in 5 seconds. 1000 words m 8 seconds. 
SORTING can be Ascending or Descending. On whole or pail or an arrey. 
Rewritten or stored as sorted in enother arrey. Zoro values may be included or 
excluded. Can be on single or Multiple dimension array* 

In tiring arrays fined fields may be specified and the sort specified by field end 
field order. Each fiold con carry its own specification of ascending or rieecanding 

Numeric valuers in the speci ficetion may be defined using simple variable 
names 

A second array can r» .petifitf for rofarol wfmn two lor more) flat* «r« equal. 
The second array data will then be sorted to determine the actual final order. 

COMES WITH EXTENSIVE DOCUMENTATION DEMONSTRATION PROGRAMS 

complete with txpianailon In me manual. ™ 

APPLE SPELLER 

APPLE SPELLER is the bridge between the many word processing pfo0ramt for 

the APPLE anff the large word processors. 

APPLE SPELLER wo.ks with API-LE WRITER. APPLE PIE. EXECUTIVE SECRETARY, 
LETTER PERFECT. MAGIC WINDOW, and SUPERSCRIBE H, 10 name jutt I few. to 
verify the spelling of your files 

APPLE SPELLER comee with a 30,000* dictionary with additional space to add 
8.000 of your own words You can add worOs. delete words, and creete an 
unlimited number of modified end/or now dictionaries for specific applications. 

There «s thus no need to worry ebout the problems of the ENGLISH v* American 

aV^LE* SPELLER .* unbelievably fast. A 10-pego document is proof-read jftll 
minute if there are no mistakes and 2 minutei 15 i«f " mere ara an unlimited 
number of errors 

There are Sh»7tuT*proo'^mt THIS ONE CAME OUT THE TOP IN THE SOfTALK 
reviews, which is why we recommend i( 
SPECIAL OFFER, 

THE ENHANCER 

THE ENHANCER, 'B e board which fits under your REVISION 7 or later APPLE 
keyboard, to give you upper and lower case with shift-key ability, beslo-es meny. 
more attractive features. 
"REDEFINE THE KEYBOAflD 

"DEFINE WOHDS OH PHRASES USING SINGLE KEYSTOKES 

"TYPEAHEAD DUFFEfl allows you lo type in 64 characters whilst the APPLE >s 

working on something olio 

"COMts with manuai AhiO DiSK Of SUPPORTING SOFTWARE E100 



SPECIAL OFFERS 



DIGITEK EXPANDER CARDS - 25% OFF 

ALL PRICES INCLUDE VA 7 ADD C2 post and packing par card 

COLOUR CARD «w 

HAM CAHU W> 

280 SOFTCARD C9i 

PARALLEL PRINTER CARD E" W 

SERIAL PRINTER CARD EM 




MORE FROM 

MICROT I mrF 
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NOW YOU HAVE AN 
APPLE MICROCOMPUTER 
YOU'LL NEED 



OMNIS 

All you've ever wished for in 
information management 
system. 

OMNIS sets new standards in database programs and 
performance that you never believed were possible 
microcomputer. 




levels of 
on a 



i OMNIS is written m UCSD Pascal*, this 
means a better structured, faster running 
set of programs than could ever be possi- 
ble using B3sic — We believe that UCSD 
Pascal* is the best microcomputer 
language available — OMNIS proves it — 

(OMNIS is structured around powerful file 
handling modules. These modules give 
you the flexibility to store and retrieve 
your information in the way thai you 
want Full multi-key indexed access is 
available to all your database files, you say 
what you want — OMNIS does the rest. 



I OMNIS provides you with a versatile 
report generating module that enables 
you to define your own reports, lists, mail- 
ing labels etc. 

I OMNIS has unparalleled search facilities 
to allow you to be selective. Those hours 
of fruitless searching through rows of card 
indexes becomes a thing of the past. 

► OMNIS lets you design your own screen 
layouts for data entry and inspection — 
you may have up to 10 screens per file. 



OMNIS has an application waiting for it in 
every business, school area laboratory and 
workshop. Wherever information needs to be 
stored and retrieved. OMNIS is available few 
both APPLE II and APPLE /// We can also sup- 
ply OMNIS for use on APPLE mirrocomputer 
networks {yes. with true multi-user record lock- 
ing] Trade enquiries welcome. 



All registered users of OMNIS will be sent free 
BACKUP disc and you will be kept informed of 
all updates and upgrades Free help will be 
given to all registered users via an OMNIS hot- 
line 



OMNIS — All you ever wanted 

APPLE II* version - £1 74.00 (incl VAT & pp) 
APPLE ///* version - £225.75 (Incl VAT & pp) ^ 



•IfirtemMi of AW t CMTWJirr Inc 

Vin Diego 



BfiRCt AVtAKO 



BLYTH COMPUTERS LIMITED 
Wenhaston, Halesworth. Suffolk 

IPI9 9DH 




^050270565 



4 

MS 



• MgOfriM run* ma* 



24 hour phone service Jmki 




Ml 
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SHAFE— DRAM 
CONTINUED 

In the February issue of HARDCORE we 
published Peter Cave's Shapedraw program, but 
unfortunately forgot to include the program 
listing. That omission is now corrected! 



DLIST 

10 GOSUB 40 : GOTO 100 

99 REM PLOT CURRENT POS 

100 HPLOT X r 1»Y - 1. TO X + itX 

- 1 TO X * liY ♦ 1 TO X - i 
,Y + 1 TO X - 1,Y - 1 

110 RETURN 

199 REM DECTOHEX 

20 N = 0!H* ■ "" 

210 ML = D / 1MB * A7. * 16 ID = D 

- BtN = N + 1 

220 IF D < 10 THEN C = D + 48: GOTO 

240 

230 C = D + 55 

240 H*(N) = CHftt (C)JD ■ A% 
250 IF D THEN 210 
26 FDR X - N TO 1 STEP ~ 1 
270 H* = H* + H*<X) t NEXT 
28 RETURN 

299 REM CALCULATE DATA AS 2 BY 
TES 

300 H% = D / 256:LZ = D - 256 * H 

7.1 RETURN 
99 9 REM PLOT GRID 
1000 IF N = NC THEN TEXT t HOME 

t PRINT "SHAPE TABLE COMPLET 

E WITH "JNCJ" SHAPES'". GOTO 

3000 

1010 HGR : HCQLOR= 7:N = N * ltT 

I m I5F = 
1020 LR - INT <<279 - W * 4> / 2 

):UD = INT <U5? - H * 4) / 

2) 

1030 FOR K = LR TO LR + W * 4 STEP 
4 

1040 HPLOT K,0 TO K»18?J NEXT 
1050 FOR K = UD TO UD + H * 4 STEP 
4 

1060 HPLOT 0,K TO 279, Kt NEXT 
1070 X=LR+2JY=UD+H*4- 

2 J HPLOT X,Y 
1099 REM SAVE POINTERS TO CURR 

ENT SHAPE 
11 D = I - ST J GOSUB 30 0:S = S + 

2t POKE S,LX: POKE S + 1,H% 
1199 REM INPUT MOVES 



1200 poke 34,0} home i vtab 22! inverse 
! print " commands -> left r 
ight up down plot mo 
ve see -> " : normal 

1210 wtab 21 * htab 15 print "sha 
pe *";n?" of m :nc:" shapes - 
"ji - st j" bytes used" 

1220 VTAB 23t HTAB 27: PRINT "CO 

MMAND? "j: GET A* 
1230 IF A* = "D" THEN Y = Y + 4 : 

G - 21 GOTO 140 
1240 IF A* ■ "U" AND Y > G THEN 

Y = Y - 4:C = 0: GOTO 1400 
1250 IF A* ■ "L" AND X > THEN 

X = X - 4:C « 35 GOTO 1400 
1260 IF A* = "R" THEN X = X + 4J 

C - i: GOTO 1400 
1270 IF A$ - "P" THEN F =11 HCOLOR= 

7X GOSUB 100 : GOTO 1210 
1280 IF A$ ■ "M" THEN F = ♦ HCOLOR" 

o: gosub ioo : hcolor^ 7: hplot 
x,y: goto 1210 
1290 if a* = "s" then f = 0: goto 

2000 
1300 GOTO 1210 

1399 REM PLOT CURRENT POSITION 

140 HPLOT X,Y5 ON F GOSUB 10 
1410 A(J) - F * 4 + C:J = J + 1 
1420 IF J < 3 GOTO 1210 
1430 IF A(2) < 4 AND A<2) > GOTO 
1500 

1440 O = A(2):A(2) ■ ft* KEEP = 1 
1450 IF A(l) THEN 1500 
146 KEEP = 2 

1470 IF NOT A<0> THEN A* = "X"! 
KEEP = 0:j = 0: GOTO 2140 

1499 REM COMPILE MOVES INTO BY 
TES AND STORE 

1500 POKE I,A<0) + A<1) * 8 + A< 
2) * 64:i =1+1 

1510 a<o) = o:a<d = o:a<2) = o:j 

= keep: KEEP = 
1520 IF J THEN A(J - 1) = Q 
1530 GOTO 1210 

1999 REM LAST 2 BYTES OF CURRE 
NT SHAPE 

2000 POKE I,A<0> + A(l) * 8 + A< 

2) * 64: poke 1+1,0:1=1+ 

2 

2010 a<o> = o:a<d = o:a<2> = o:j 

= 

2099 REM DRAW SHAPE 

210 HGR : HOME : VTAB 22t INVERSE 
J PRINT " TYPE 'X' TO CAN 
CEL 'E' TO ENTER ": NORMAL 
: POKE 34,22 
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2110 HOME : HTAB 5i INPUT "SCALE 

? "}AS 
2120 M = FRE (0) 
2130 IF At = " E " THEN 1000 
2140 IF A* - "X" THEN N = N - It 

S = S - 2tl = Tit GOTO 10 
2150 IF A* - "S" THEN TEXT J HOME 

t GOTO 3000 
2160 SC = VAL <A$>: IF SC < 1 OR 

SC > 255 THEN PRINT "SCALE 

MOST BE BETWEEN 1 AND 255" J I 
FOR Z = 1 TO 1500: NEXT t GOTO 

2110 

2170 VTAB 23! HTAB 24: CALL - 9 
58: INPOT "ROTATION? "JR: IF 
R > 64 THEN PRINT "MAXIMUM 
VALUE FOR ROTATION IS 64" } S FOR 
Z m 1 TO 1500 t NEXT ! GOTO 2 
170 

2180 rot= r: scale= sc: hgr : hcolor= 

7$ DRAW N AT 139,79 
2190 VTAB 21! CALL - 868: PRINT 

"SHAPE *"JN?" SCALE "JSC;" 
ROTATION "JR 
2200 GOTO 2110 

2999 REM STORE TABLE LENGTH AN 
D SAVE TABLE 

3000 D = I - STJ GOSUB 300 
3010 POKE 0,L%: POKE I* HZ 

3020 PRINT "LENGTH", D, "$"5 : GOSUB 

200: PRINT H* 
3030 PRINT "BEGINS", ST, "$" J ID = 

ST: GOSUB 20 0: PRINT H* 
3040 PRINT "ENDS",I,"$"; :D = IJ GOSUB 

200: PRINT H* 
3050 VTAB 8: PRINT "TO SAVE SHAP 

E TABLE ON TAPE, ENTER 

MONITOR (CALL-151) AND TYPE: 

-"t PRINT 
3060 PRINT " 0.1W "I 
3070 D = ST: GOSUB 200 : PRINT H*" 

."J 

3080 D = li GOSUB 200 : PRINT H*"W 
11 

3090 PRINT : PRINT "USE SHLOAD T 

O RECOVER" 
3100 VTAB 17: PRINT "TO SAVE ON 

DISK type:-" 

3110 VTAB 19: PRINT " BSAVE < 
TABLE NAME) ,A"JST" ,L";i - 
ST 

3120 VTAB 2i: PRINT "TO RECOVER 
USE ' SHAPE-PROG ' FROM THE 
BASUG INTRO. DISK" 
3130 END 

3999 REM INITIALISE 

4000 DIM A(2) 

4010 UPPER = PEEK (115) + PEEK 

(116) * 256 - 50 
4020 LOWER = PEEK (105) + PEEK 

(106) * 256 + 300 
4099 REM DATA INPUT 



410 SCALE- 11 ROT= 0'. SPEED= 25 

5: TEXT : HOME 
1110 PRINT "NORMAL CHARACTERS AR 
E BASED ON AN" : PRINT " ARRAN 
CEMENT OF 5 X 7 CELLS WITHIN 
AN": PRINT "OVERALL GRID OF 
7X8 CELLS": PRINT : PRINT 
"YOUR GRID CAN BE FROM 1 X 1 
TO 69 X 39" 
4120 VTAB 71 CALL - 958: INPUT 
"HOW WIDE IS YOUR OVERALL GR 
ID? "JW: IF W < 1 OR W > 69 THEN 
4120 

4130 VTAB 9: CALL - 958: INPOT 
"HOW HIGH IS YOUR OVERALL GR 
ID? ";h: IF H < 1 OR H > 39 THEN 
4130 

4140 VTAB 12: PRINT "THE SHAPE T 
ABLE CAN HOLD 255 CHARACTERS 

II 

4150 VTAB 14S CALL - 958 J INPUT 
"HOW MANY SHAPES IN YOUR TAB 
LE? "JNC: IF NC < 1 OR NC > 
255 THEN 4150 

4160 vtab 18: print "there is sp 
ace between:": print : if lg 

WER < = 8191 THEN PRINT LO 

WERT' AND B191", 
4170 IF UPPER > » 16384 THEN PRINT 

"16384 AND "J UPPER 
4180 PRINT : VTAB 22J INPUT "WHE 

RE SHOULD YOUR TABLE BEGIN? 

ii • 

4199 REM START OF SHAPE TABLE 
& STORE ADDRESS 

4200 S - STtl » ST * NC? * 2 * z:d 

= STt GO SUE: 30 
4210 POKE 232, L%: POKE 233, HVA POKE 
ST,NC: POKE ST + 1,0 



4220 


RETURN 






63979 


REM 


xxxxxxxxxxxxxxxxxxxx 


63980 


REM 


X 




X 


63981 


REM 


x 


SHAPEDRAW 2.2 


X 


639B2 


REM 


X 




X 


63983 


REM 


X 


SEE 


X 


63984 


REM 


X 


PRACTICAL 


X 


63985 


REM 




COMPUTING 


X 


63986 


REM 


X 


SEPT. AND DEC 80 


X 


63987 


REM 


X 




X 


63988 


REM 


X 




X 


63989 


REM 


X 


FURTHER 


X 


63990 


REM 


X 


MODIFICATIONS BY 


X 


63991 


REM 


X 




X 


63992 


REM 


X 


PETER L* CAVE 


X 


63993 


REM 


X 


"BRIDGEMOUNT" 


X 


63994 


REM 


X 


2 LITTLE HALLAM 


X 


63995 


REM 


X 


HILL 9 


X 


63996 


REM 


X 


ILKESTON* 


X 


63997 


REM 


X 


DERBY DE7 4LY 


X 


63998 


REM 


M 




X 


63999 


REM 


xxxxxxxxxxxxxxxxxxxx 
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reader's 
letters 

East Han 

Dear David, 

A point which nay be of interest to Hardcore 
readers* 

I bought ny AFftE at Xnas 1980. The power pack, 
went on the blink, in Feb Bl and was repaired 
under guarantee. 

It went again in April 82, whilst doing nothing 
but sitting there switched on. 
The people who supplied it could only offer to 
take it in, send it to APPLE and either have it 
repaired (estinated W weeks) or to supply an 
"exchange unit" (3 weeks). 

As I need the AFftE for ny work, I tried Guestel 
Ltd. who were very helpful but could only offer 
a replacement ur.it on an exchange basis (which I 
collected fron then on the sat*? day and this got 
Me out of trouble). 

The staggering thing, however, is the price. The 
exchange unit is listed, according to Guestel at 
£175 plus VAT, provided it has not been opened, 
in which case il cannot be exchanged. I an still 
trying to find out how nuch it would cost ne to 
retrieve ny old one so that I can repair it for 
a spare. 

The EXCHANGE PRICE would buy a complete Sinclair 
32K colour computer plus a spare power supply. 
Now I know that Sinclair do not have the 
greatest reputation for reliability but ny 
experience of the APPLE (I have also had trouble 
with the disc drives and lost the bleeper during 
this tine) isn't that good either. 

Car. anybody justify the cost of the power pad*., 
when everybody else seens to ttanaqe OK with 
conventional power supplies for about i40 
retail? 

I can assure anyone with the sane problen., arid 
with the tine to do it, that a conventional 
power pack works the APPLE OK, can be nade to 
fit into the space available, does not give the 
sane radio/TV interference, and can be built for 
£30 or less, buying the bits at retail prices. 
It would be worth sonebody's tine to market such 
a unit, if ny experience is anything to 90 by. 



Yours 



Brighton 

Dear ESSUG, 

Thanks for the UPDATE. You asked for views on 
what BASUG should be, and why people don't 
attend courses. I can only speak, for nyself , but 
here goes, for what it is worth. 
Seens to he that the relevant point is that host 
nenbers are not hobbyists, and haybe there 
should be a separate group for those that are. 
Take Myself for example. I an a professional 
writer and use ny APPLE alnost exclusively as a 
wordpro system This nay seen crazy in view of 
the availability of better wordpros for the 
price* but I initially bought this to be 
compatible with a colleague who is co-author of 
sone of ny writings and had an APPLE already. 

When I bought the systen I thought "Great I car. 
Play genes arri stuff too". In fact, after the 
first week, I never have, 

As long as I can process words, F« happs, and I 
inagine lots of other nenbers are single users 
who have a sinilar attitude. I don't need 
nachine code or PASCAL or whatever! but I found 
EflSUG of innense value in putting no in direct 
contact with Ian Tracknan, when I found 
"Go-Between" wouldn't operate with ny printer 
card— this led to Ian's report in the last 
HARDCORE which no doubt helped lots of other 
people with this problen. 
So what I an really after is specific 
infornation about betteT word processing with 
the APPLE II. I get this out of the nsgazine, 
skin the rest of it and throw it out. For this, 
the subscription is well worth the price and I 
an the owner of a rugged, effective wordpro that 
does all I want it to do at a nodest cost, arid 
with which I can work on files sent by ny 
colleague who is nore involved with things like 
nachine code arid slips ne the occasional 
subroutine that I use, cookbook style, without 
having the faintest idea why it works — like 
the routine to count the nunber of words in an 
article. 

I hope that explains why I — and presunably 
dozens or hundreds like ne — don 'to seen 
super -enthusiastic about all of BASUG's diverse 
activities. I've My own little niche arid I'n 
happy in it. What I would like is nore 
infornation on inprovinq Apple Writer but even 
there I'n contented enough not to have bothered 
with another card so that I can run the superior 
Electric Pencils and the like, Maybee I ought to 
get nore nenory though! 

Eiest Wishes, 



Ted Lepley 



John Gribbin 
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Stratford 
London E15 

Dear John, 

In your article about enhanced node on EPSON you 
asked if anybody knew why a driver on page $3 
often gets lost when you return to the 
Applewriter Editor. Hy investigations show that 
(1) it only gets overwritten if you use the back, 
arrow "vacuun cleaner" key; (2) if you erase > 
256 characters it always gets lost; <3) if you 
erase only a few characters it usually doesn't 
get lost. Further investigation shows that 
Applewriter's 256-byte "deletion buffer" runs 
fro* $200 - $3CF, thus explaining the above 
observations. 

on Have you seen Applewriter II? If not, GET 
HOLD OF IT SOON! it's really specacular. 
Everything that was horrible about Applewriter 
1*2 has been fixed, arid there are irfwnerahle 
added features. I an very keen to use it* but 
for one disastrous problem! there is no 
provision for using a RAK printer driver (you 
car, only specify a slot number for output). I an 
wore or less cowitted to using a complicated 
driver I wrote to give underlining, super- and 
subscripts, and sone Greek letters on EPSON 
MX-80 so the problem is rather acute* 

Applewriter n is thoroughly protected against 
code-patching (it erases itself fro* nenory on 
exit) arid the only solution I can think, of is to 
put ny driver in I/O locations $CN00 - CNFF and 
*C800 over the $C8FF. The Applewriter II would 
call ♦CNOO; hy driver would take over the $C800 
space. Do you know how this could be done? Is 
it possible to nake up a card with just this 
little bit of RAH for a vacant slot?> I would 
pay large suns for a solution! 

Looking ahead a little, it is clear that 
Applewriter Ui is dead. Presumably there will 
be an interest in develop ing a "Go-Between" for 
the new version, so ny questions above have a 
wider inplication that just ny own difficulty. 

P.B. Applewriter II is highly addictive. Be 
warred. 

P.P.S. The shift-key nod of Type-Right doesn't 
work with Applewriter II although it is supposed 
to support shift key nods. 

Yours sincerely 

Robert Purves 

(Ed. A quick, survey of Applewriter II and 
Type-Right users around the office shows that 
the shift key nod does work for us, Ett we are 
looking into it). 



Croydon 

Dear Sir, 

I write this note, I hope, correctly set out for 
innediate photocopying into your Letters page, 
hopefully to save you tine. 
It is also to nake the point that nost of the 
dot matrix reproduction enployed for /sic/ is 
just ghastly. In this day and age we should 
surely do all we can to get the job done 
properly. 

It is argued that this problen is one of cost. 
Rubbish. Hy Qolfballi an Adler SO 1035, cost 
£1100 two years ago when nost others were twice 
the price. It was just a case of spending sone 
tine looking round properly^ And don't forget to 
insist on the "£" synbol. 
Prices have cone down considerably since then, 
and sow colleagues and I are doing another such 
survey! we hope to pass on our results when 
available. 

Yours, t c 

Paul Vernon 



(Ed, Many thanks for your thoughtful letter and 
attenpt to fornat it for insertion. Much 
appreciated. Unfortunately, as you will see* we 
had to retype because you nissed the colurm 
width by 4cn. He couldn't quite gather whether 
you wanted to say that the typeface used in 
Hardcore is ghastly. That is a new one on us, Me 
editors have so far stuck to the 
Centronics/Epson printers, not only because nany 
nenbers have and use then for contributions, but 
also because we are not entirely convinced by 
your clain that anything is ipso facto 'better' 
than a dot natrix. To be brutally frank, for 
instance, your expensive Machine's shaded face 
golfball nakes a very uneven inpact. But let's 
turn it over to our readers and help Paul's 
survey. What do you think of our layout and 
presentation'' Is it really tine for us to turn 
to our daisywheel printers?) 
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Norwich 

Dear BASUG. 

Wiilst reading the Apple-Writer article in a 
recent Hardcore it occured to ne that tlie 
Majority of BA5UG neuters would probably rat 
have RAHCARDS in their Machines. I also felt 
that the Majority of BASUG nenbers would not 
always need all the buffer space available for 
Apple-writer. 

I therefore suggest that or* of the experts on 
the above program cones up witii the patches (and 
explanations for users of versions already 
patched for Lower Case Chips!) which would chain 
the TEDITQR and PRINTER prolans together in 
nenory. By ny calculations the programs both 
occupy 4.5 K. of nenory which should allow 
plenty of roon for the average piece of text 

with a "fast uBtgnr. 

In the process of putting together the patches 
two bugs which I find very aggravating could be 
fixed perhaps. 

1) . When I use 'C to Continue printing froM the 
printer Menu I get the last used FILENAME or 
Search / Replace as a page heading. I suppose 
the entry of a space as the heading Might cure 
this » but why should this be necessary ?. 

2) . i*ien using Multiple drives the Apple-Writer 
will return to the original Drive for the 
PRINTER progran (even after saving a file called 
"FILE,D2> However, if the user has separate 
controllers the Apple-Writer will not default to 
the original SLOT. 

To add to My suggestions for THINGS TO DO can I 
suggest the following be published. 

A) . A short progran to farnat disks for data 
(allowing the early tracks to be used by 
patching the VTOC. to show thett as unused. I 
appreciate that ZERO ZERO indicates sonething 
special , but would like to have the true HOK 
available for data disks). 

B) . A patch to enable the user to ignore "WRITE 
PROTECT" error Messages. The patch would allow 
the re-use of old Master Disks (without 
resorting to scissors». 

C) . A patch to stop non-present files being 
opened autonatically. The Modification of the 
paraneter list would avoid spurious CATALOG 
entries and loss of disk space. It would have to 
be invoked before accessing files and repaired 
afterwards in case the file was genuinely needed 
if not found. 

Grahan Rubens. 

(Ed. Yes. you've certainly cone up with sone 
good ideas. Grahan. Ww's going to be first with 
the solutions? 

The CONTINUE problen shouldn't happen, I use it 
frequently arid have never had the problen). 

John Sharp 



BroMley Kent 

Dear BASUG, 

I recently purchased an APPLE m. Could you 
please put Me in touch with any individual or 
organisations that run tuition courses on an 
APPLE in so that I nay better learn the 
Machine. 

W.G.ChapMan 

(Ed. We would gladly run one if we thought there 
were enough call for it, but in view of the 
trouble we have encounteredin getting 
support for APPLE IE courses I do not think, we 
could even contenplate it. Cwld we lend our 
voice to yours! is anyone doing anything for the 
APPLE m?) 

FarehaM, Hants 

Dear Sir, 

I have an interest in Anateur Radio. My call 
sign is G3YMS. 

I work SSE: on HF and FM on VHF, 

I would like to work RTTY on HF?WF utilising 

the APPLE as the terminal. 

If there are other Members with sinilar 

interests, would they care to contact 

John H Ison, G3YMS 

■ NtMun.'! ....Hp 

1 *1 II ir< • -nil 

'•-fl'imRM 1 



Hottinghan 

Dear 9ir, 

I see that in BASUG you are looking for soneone 
to coordinate an Anateur Radio SIC. I would be 
quite keen to do this, although I should explain 
that I 3M rather heavily coMMitted tiMeyise with 
various other AHateur Radio affairs, but could 
start by cementing on sone AMateur Radio 
Program that I have. 
Hy call sign is GJAFJ. 

Geoff Dover 

(Ed. Hell Geoff and John, we know there ere a 
lot of you Radio HaMS out there, and there are 
Many More on the sideline with a passing 
interest, as judged by the response to the 
station set UP by Derek Turner, Hike Hatson et 
al at APPLE 82. I think you are probably doing 
sonething already, but are too busy to let us 
know. 

So yes, do get sonething going, but do let the 
others know what it is!) 
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Watford 



Dear Basug, 



First of all* let me congratulate you on running 
a fine club and producing an excellent Magazine 
in "Hard Core". 

I have been Meaning to write to you for some 
tine but somehow never got round to it» so here 
are a nunber of points / questions / info. / 
etc. which have accumulated over the past year 
or so of Membership. 

1) I have had My Apple II plus for alMost two 
years now f out only recently discovered a piece 
of information about the Reset switch, which 
many users may find useful. 

Many articles have been written about the Apple, 
complaining about the Reset key being too close 
to the Return key, thus allowing accidental 
resets. (I myself have found from experience 
that actually this only happens once in a blue 
moon because the "stronger" spring underneath 
the RESET Key repels all but the deliberate 
presses) . 

However, upon reading s miscellaneous sheet of 
paper supplied with our latest APPPLE at work, I 
discovered that at the flick of a switch* the 
RESET function can only be obtained by pressing 
the CTRL & RESET keys together. 

The switch in question is on the secondary 
keyboard circuit board (the smaller one) in the 
left hand corner, labelled SI. 

2) When I received the Introductory Disk, I 
encountered 3 problem with "HAUNTED OWE". The 
program crashes with a 'mt&AD RETURN ERR7 
STOPPED AT 301 0", whenever you have 'all your 
treasures stolen' by one of the Monsters. 

T examined the program and traced it through but 
could see absolutely no way it could happen , 
but it did!! 

However, I recently read an article in CALL 
APPLE'S, 'ALL AEOUT APPLESOFT' (p 100), which 
describes a bug in the FP BASIC interpreter 
which sometimes causes 'RETURN WITHOUT GOSU&' 
errors in some programs. I assume that there is 
a similar bug in the INTEGER one as well. I 
haven't found out why but I have found out how 
to make it work. 

Simply change the variable in the loop in lines 
3940,3945,3950 to use a new varaible (say ZX) 
instead of the variable I used. 
It could be that it is allocating variables over 
a page boundary. 



3) I have also found a bug in the 'LOST 
DUTCHMAN'S GOLD' program on library Disk 20. 
When you 'EXAMINE RIFLE' it crashes with 3 
syntax error due to a missing colon in line 1470 
before the <RETURN>, 

4) On Disk 19 'SFtLuWER^ and 'THE HAZE' I had 
trouble since the programs loaded lines of 
garbage when they listed. 

5) I have bought 8 games disks from the library, 
and although I haven't the time to do a complete 
review of each one, the following table gives 
some idea of my opinion. 

!ij 

DISK MARKS OUT STAR F"R0GRAMS 
OF TEN 

10 7.5 Game of Genius, 

MJBBLE-li Star Attack. 

15 5.5 Air Attack,Space 
War V 

18 5 Oregon Trail 

20 9.5 Lost Dutchman's 

Gold, Mini Golf, Collision 

29 6 Sevens, Othello 

33 7 Hi-0,Horse Race, 

Cribbage 

40 8 Apple Wars, Space 

Pilot, Space Mar 

El 7 Eamon 

All contain at least a couple of quality 
programs, although some contain jur*. as well, so 
making them well worth the maegre cost. 

6) I also own 28000 single board computer (made 
by AMD). It has an on board monitor /assembler in 
EPROM. However, the assembler is not very good 
and does in fact contain 3 few bugs. 

I have therefore been trying to obtain a decent 
Z8000 cross-assembler to run on the APPLE, 
either under DOS 3.3 or CP/M.I have however, had 
no luck at all in finding one. I have tried many 

s/w retailers including PETE 1 PAh\ LIFEBOAT, 
SPIDER S/W etc. (I would also like to obtain a 
Z8000 disassembler as well). 

I would therefore be very grateful indeed* if 
you could let me have any information at all 
about companies or any BASUG members who might 
be able to help in this matter. 



Yours programmingly. 
M. Bryant 
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Dear John, 



Surrey 
Dear Sir, 

I have recently joined BASUG and would just like 
to say how much I enjoyed the introductory disk 
(which I hadn't been expecting). The LIFE 
program itself has saved fie the membership fee 
immediatly. 

Do you have, or can you refer ne to any reviews 
of other software, like the review in Hardcore 
on the statistics disk No. 3?. 

Although yw do rot publish membership lists ( I 
would like to make contact with other nearby 
members, so I would be happy if you passed my 
name arid 3ddress on. 

From the aforementioned review it seems that 
some of the programs in the library might be 
capable of iMprovement. Would a 'significant' 
improvement/rewrite of a program already in the 
library be eligible for inclusion ? Do you 
accept single programs or do you want only 
complete disks full of programs arid 
documentation like the introductory disk ? 
Thar* *ou a^ain for the introductory disk, 
unravelling/study of the programs will keep me 
absorbed for weeks of evenings. 



Rod Price 

M 

\mnmm 

TH10 7UE 

(Ed. Thanks for the commer.ts or. the introductory 
disks, rou seem to have qot or. OK. Some people 
are having a little trouble with LIFE, arid the 
HAUNTED CAVE. Again there is help in the early 
HARDCORES. The HAUNTED CAVE does reed some 
attention, and some guide to use. Any volunteers 
to write a piece on how to play adventures, very 
very basic. The EAhON users should have someone 
among them who could help the beginners, they 
often do not know the simplest commands. 



On the subject of Eamon disks, we have had 
problems ell along the line copying then! in 
particular the text files. They are too long, 
Has anyone any idea why?) 



I enjoyed reading your article on Epson 
printers, and am grateful to you for telephoning 
« 3 f ew weeks ago concerning my enquiry. 

I have the following items for sale and wonder 
if you know of anyone who might be interested in 
buying* 

1 Apple Eurocolour card ....£50 o.n.o. 
1 Epson interface with graphics CDAPL ROM) 
£70 o.n.o. 

In addition I am looking for an Apple II disc 
drive without controller. Perhaps you know of 
someone who has ore who is looking to sell? 

I know you are kept snowed tinder with paperwork 
so don't bother to reply unless you are able to 
help. 



Dr. W.A. Telfer Brunton 

West Molesey 

Dear Mr Sharp, 

I have recently acquired an Apple II computer. I 
have had it for two months arid some of the parts 
still puzzle me. Therefore I am writing to see 
if there is anyone locally who could come and 
see me to explain some of the theories, 
I feel that I should explain that I am 
physically handicapped and I would appreciate 
any help that you could give me. 
Another problem I have is that I have a number 
of programmes which were discussed in "Practical 
Computing" magazine which I would like to try 
bill on my computer but it would take me a very 
long time to programme them into my computer, 
owing to the fact that I type with one toe. 
Please let me know if there is anyone who could 
help me. 
Yours sincerely, 

Hugh Slater 

(Tony Williams writes! He do have an SIG for 
handicapped people with disabilities as severe 
as yours, Hugh. As a first suggestion why not 
contact Glyn Vernon at the Spastic Society's 
Professional Workshop ir, Hilton Keynes. When I 
interviewed him for PCW last year Dirt. Eoydell 
was using a virtually unmodified Apple for 
programming but there are various simple 
Modifications for making typing in listings 
easier. There are other Apple users in West 
Holesey and I am sure they will contact us and 
offer to help out.) 



Page 38 HARDCORE - The Journal of the British Apple Systems User Group June 1932 



— 



Ealing 

Dear Sirs, 

I'd like to have nore infornation abort SOW 
literature library and how can I borrow articles 
fron it, and nore important what Kind of 
infornation can I access*? 
I an a proud owner of an ITT 2020 and I should 
mforn you arid your newbers (ITT owners) that 
all the service nanuals and disk tests cari be 
obtained fron ITT . 

Sincerely Yours 

C Santos 



1 frock Close 
ftuislip 
Middx 
HA* 8AF 



Dear David) 

COMPUTER APPRECIATION WEEK RUTSUP 

We would like to extend an invitation to BASUG 
to our Conputer Appreciation Week fron the 16th 
to the 21st of August 1982. 
Monday and Tuesday are for Business and 
Professional Applications! the rest of the week 
will be devoted to EDucational and Personal we* 



ttenber 82051191 

(Ed. We nearly didn't print your nane because we 
couldn't read it. It was only the nutter on the 
database that saved the day. Which only goes to 
show that Membership nunbers have sow use after 
all* 

You have touched on two problem which affect 
all neuters. A lot of infornation can be culled 
fron past issues of Hard Core - such as the ITT 
address to write to for the service nanuals * 
etc. 

They also tell you nore about what is available 
in the library, how to get then etc. The library 
list is obtained by writing to the literature 
librarian. You then pay post or. what you borrow. 
We have APNOTES fron the IAC in the States* and 
other user group Magazines. There are sone 
books, articles and all sorts of other qoodies. 

Well how do you newer nenbers find all this 
infornation out? Ely buying every copy of 
HAFiDCORE you can get your hands on. The conplete 
set for last year is £7.20 including post.) 



The objective of the week is to stimulate a 
widespread interest in Conputers and conputers* 
We welcone contributions in the three areas 
above. Our goal is rot that people should buy 
conputers* but that they should be sufficiently 
stimulated to desire to explore the full 
benefits of the world of conputers. 
Conputer Town Ruislip is holding the Conputer 
Appreciation week in association with and at the 
RuisliP Library. 

I would be grateful if you would give this a 
wider coverage. 

F.A.Fadipe 
Project Leader 



(Ed. Can any nenbers in the Ruislip area help 
out? The Conputer town concept is one we would 
like to take part in if we only had the tine. 
The week should be a good focus for starting a 
local group.) 
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by BHARAT MUNJAL 

The purpose of this article is to illustrate how 
Applesoft works on program lines and to give a 
breakdown of the structure of a program line. 
The information provided here should allow you 
to examine your programs and correct any 
corruption, and also allow you to insert illegal 
statements into a program, 

APPLESOFT works on the basis of an 
interpreter, as do most microcomputer 
implementations of BASIC. The interpreter is a 
program which resides permanently within the 
Apple. It is the interpreter's function to read in 
program lines and perform whatever actions are 
necessary, depending on the content of the 
program line. To the interpreter^ he program is 
only data in a special sequence, upon which it has 
to operate. This means that we should also be 
able to get an idea of what a program looks like 
to an interpreter. However, normal commands 
from within Applesoft will not allow us to do 
that. So we have to use the monitor to look at 
the actual program statement lines. 

Certain rules have to be fallowed, to allow an 
interpreter to perform correctly. These rules 
govern the starting location of the program,its 
length and more importantly, the syntax of each 
line within the program. 

All BASIC statements are stored in a binary form 
within the computer, in a manner similar to all 
the other pieces of information that it stores. 
This means that each character is converted to 
its binary equivalent when you type it in and 
converted back when you display it. In a similar 
way, all Applesoft commands are stored as binary 
numbers. To save space, each command word has 
been allocated a unique number called its "token" 
* Each token is a one byte long. The space saving 
should be immediately obvious. Instead of using 
6 bytes for the command NORMAL, we only use 
one, A list of all Applesoft tokens is on Page 
121 of the Applesoft Manual, 

An Applesoft program line appears as shown 
belowl- 

The 6502 processor operates on all addresses in 
reverse order in the two bytes that are available 
for each address. This means that an address 
such as *FDED will be stored as *ED,*FD, 
Applesoft program lines start building up from 
LOMEM (Default is 4800). Applesoft also 
requires that the first byte of any program must 
be a 00. Therefore the actual program line 
usually starts from $801 (2049 Decimal). 



Program lines within Applesoft are linked to 
each other by a method of 'chaining'. This means 

that each line within an Applesoft program 
carries the starting address of the next line, as 
shown in the above diagram. This chaining is 
essential, since this is the only way that 
Applesoft knows where each particular line is 
located. Every time it comes across a GOTO or 
GOSUB instruction it starts from the beginning 
of the program (usually $0801) and follows the 
links until it finds the line that it is looking for. 
(This is the reason why you should have all your 
frequently accessed routines at the beginning of 
the program. Each time the interpreter comes 
across a GOSUB it starts from the beginning, If 
you have your routines near the front, it doesn't 
have to travel a long way down the program 
looking for the line number). 




4^" 



HIGH 
QUALITY 
FANTASTIC PRICE 

5!4" DISCS FOR APPLES 

WITH 
2 YEARS WARRANTY 

OUR PRICES INCLUDE VAT 

1+ Boxes (10 DISCS) £16 
10+ Boxes £15 
100+ Boxes £14 

+ Postage £1 for up to 5 boxes £2 for 
6 boxes 




COMPUTER SCIENCE 
Beacon House, P.O. BOX 46 
London N20 0YA 
Telephone: 01 368 3290 
Telex: 83247 INTLAB 
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Each program line begins with a two byte address 
field which contains the starting address of the 
next line. This address is not related to the line 
number of the next line* It refers to the position 
within memory. The next two bytes contain the 
current line number. With two bytes the highest 
number you can store is 65535. However, it only 
allows you line numbers up to 63999. 

The actual program starts from byte 5 of the 
line. This means that the first character of any 
program usually appears at $030$* All command 
words are shown in their tokemsed format. All 
strings within the program which are between 
quotes are maintained as they are and the end of 
a program line is indicated by a $00* At this 
point the interpreter stops executing and gets 
the 'next' line of the program. 

In addition to tokenising a program, an 
interpreter also takes care of the placing of data 
and variables for the program and maintains the 
pointers for these. Data strings created during 
the running of the program start building down 
from HIMEM, while the actual program lines build 
up from LOMEM. A reasonably simple table is 
shown on page 127 of the Applesoft Manual* 

Applesoft maintains within page zero of the 
memory certain pointers which are connected with 
the program currently in memory. The relevant 
ones are shown below!- 
LOCATION USE 

$67-68 Beginning of pragram.Usually set to 
$0801 far ROM based machines 

$69-6A Start of simple variable space* It is also 
quite frequently the end of program 1 or 

2 

$6B-6C Pointer to beginning of array space. 
$6F-70 Start of string storage. String storage 
starts from here and goes on till HIMEM 

$73-74 Highest location in memory available to 
Applesoft plus one* 

$AF-B0 End of program. 

Keep in mind that all these addresses are held in 
reverse order,which means that when you read 
them, read the second byte first, e.g. $67-68 may 
hold $0801 for the start of the program. You will 
find that $67=01 and $68=08, 

You must access and change this data through the 
monitor. The instructions for the use of the 
monitor are supplied either in the Red book or 
the Apple II Reference Manual. 



HOW TO SUPERCHARGE 
YOUR AFFLE 

By Richard Teed 

There are two things needed to do this* The 
first is a BASIC compiler such as the 
EXPEDITER. The second is an arithmetic 
processing unit such as the AM9511 from 
California Computer System?. Although the 
second is expensive it can make dramatic changes 
to execution times; for examples 



100 FORN=l TO 5000 
110 A=A+SQR(N) 
120 NEXT N 
130 PRINT A 



This program takes 4J24 minutes in normal 
Applesoft* Compiling it reduces the time by 12 
seconds to 4512, this is not much of a saving 
because the compiler uses the floating point 
routines in the interpreter - the time saved 
comes from the compiled code knowing where to 
find its variables and commands more quickly 
than the interpreter, the larger the program the 
greater the advantage of compiling. 

Running the above program on the floating 
point processor reduced the execution time to 
just 24 seconds. Now the compilers saving 
becomes significant, using both drops execution 
time to slightly over 1 1 seconds. 

To give you a comparison a Data General Nova 
4 takes about 2 seconds to run the same program 
in FORTRAN. 

There are a few problems that hav occurred 
with the arithmetic processsor and they are! 
Applesoft is RAM so you lose 10K but you can 
get round this by updating a copy of Applesoft on 
a RAM card. The second is more serious and is to 
do with hi res graphics - the program just seems 
to think its hit an end command - there's no 
telling where, it just stops (the same place for 
each program). Thanks to the Expediter a trace 
should show the problem. 

A final word on the Expediter, I have heard of 
a program that did a string sort and took about 

an hour in Applesoft} compiled it took slightly 
undpr a minute. 



I hope to produce an article such as this for 
Integer Basic in the near future. 
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APPEND 

The Final Solution 
- DonH Do 

by Hedley G Wright 
Argyll Research and Analysis 



If DOS does not keep a record of the length of a 
text file then the obvious answer is to fill this 
want by writing the length into record zero, The 
little-used though immensely valuable BYTE 
parameter! M »B", assists in handling this. If all 



The Applesoft Disk II DOS command APPEND has 
several faults which make it useless for serious 
purposes. The object of this article is to 
demonstrate the use of sequential files in 
Applesoft by simple routines that provide the 
facilities of APPEND and improved speed of 
working. 

Unlike binary files and Applesoft program files, 
textfiles contain no information about their 
exact length. The reason why they were designed 
this way is possibly related to Apple DOS's 
economical use of disk space in random access 
textfiles. The end of a textfile, or a textfile 
record in the case of random access files, is 
marked by the writing of an ASCII zero, the End 
Of File (EOF) Marker, provided that no records of 
the file have previously been written on the disk 
sector in use. Thus if a file is overwritten on 
itself in a shorter form, without deleting the 
original, then no EOF will be written. Sometimes 
however the EOF marker is omitted or is not 
overwritten by records subsequently added to the 
file by the APPEND command. 

APPEND is intended to find the end of a 
sequential textfile rapidly so that more data can 
be added, and this it conspicuously fails to do. It 
functions by starting at the beginning of a file 
and reading serially through until it finds the 
EOF zero marker. Reading then stops and the 
next WRITE to the file should cover up the old 
EOF marker and write a new one when the file is 
CLOSEd. APPEND, however, will fail to function 
correctly if the EOF was never written or if an 
old EOF marker was not covered up in a previous 
APPEND operation. Various "fixes" have been 
proposed (read Neil McFerran in HARDCORE 
Vol.1 No.4) but APPEND is still a menace to its 
users and a time-waster. In a search for reliable 
methods of appending information to the end of 
sequential files various alternatives were tried. 
The most obvious and simple one is to keep a 
count of the number of fields in the file at the 
start in a fixed length record zero, which can be 
rewritten as the file grows! then it is only a 
simple matter of skimming through the file with 
the POSITION command, counting the field-end 
RETURNS, to reach the end of the file and start 
writing. This technique has the same damning 
flaw that makes APPEND useless in practice. It 
takes too long. 



the data in a file are written as text strings, the 
length of the file can be recorded by keeping a 
tally in the form "BYTE = BYTE f 
LEN(entry$)+l"S the "+1" is required to account 
for the terminal RETURN. After new data have 
been written the file is CLOSED, reOPENed and 
the byte tally is written as a fixed length string 
in record zero i.e. "PRINT RIGHT$("OO00" + 
STR*(BYTE),5)\ When the file is next OPENed to 
enter more data, record zero can be read and a 
WRITE can take place at the end of the file 
immediately. Move-by-move details of this 
simple implementation will not be given as a 
more sophisticated approach is recommended. 

The shortcomings of the simple byte count 
scheme are that all data have to be written as 
text strings since it is not possible to determine 
directly the length of real variables, and mare 
importantly, the BYTE parameter is restricted in 
value to less than 32768 ($3000), which is 
unexpected and not documented. 

The program printed here demonstrates an 
effective way of appending! the routines for 
OPEN, WRITE, READ and CLOSE are illustrated 
and it is not necessary to read any further to be 
able to extract and use them in other programs. 
It is strongly recommended that they be adopted 
if long files are being used! there will be no 
difficulties in appending rapidly to files up to 
the full capacity of a DISK II floppy. 

The essence of the program technique is to 
monitor the file length by inspecting the File 
Manager Work Area in DOS, note carefully that 
this is not the same as the File Manager Work 
Area Buffer for the file. Possibly some APPEND 
errors originate in faulty exchange of 
information between the Work Area and the Work 
Area Buffer. To follow this article in detail it is 
worth consulting "Beneath Apple DOS" by Worth 
and Lechner, page 6-15, 
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In a 43K system the Work Area starts at $B5D1 
(46545 decimal). This address is calculated from 
page 3 parameters for any size of system in line 
100 of the program and, as written, will work for 
any size of system except those with DOS 
relocated in a memory expansion or language 
board? in such cases DOS cannot be accessed 
directly from BASIC, machine code routines would 
be required. The basis of the calculation is that 
the work area starts $16 above the File Manager 
Parameter List! the address of the start of the 
Parameter List is given by the contents of 
$03DD/03DE (high byte) and 03E0/03E1 (low 
byte). 

The File Manager Work Area maintains 
information about the file currently being 
processed; the fallowing positions above its 
start contain the most pertinent information. 
Start plust- 

$13/14 the current file sector being accessed 
*15 the byte position within the sector 

$17/18 the ",L" parameter of a random access 
file 

*19/iA the R A file record being accessed 
$1B/1C the byte position within the record. 

The actual position indicated by the byte 
pointers is one ahead of the last byte processed! 
in other words, to the potential position of the 
next data to be written or the EOF marker if the 
file is closed. 

If a sequential file is being processed the ",L" is 
defaulted to one! consequently painter 19/1 A 
counts through the file in records of one byte and 
1B/1C, the byte offset into the record, remains 
zero. Since the record pointer is only two bytes 
long it will return to lero after 256 (decimal) 
sectors of a file have been processed. 19/1A and 
1B/1C thus cannot be used directly to assist in 
the use of the "»B" parameter in a sequential 
file. However, if the sequential file is opened 
with an %L" parameter of 256 then $19/1A and 
$1B(/1C) move in parallel with $13/14 and $15 
and one can count into the file using 
sectors/records and bytes to well beyond the 
capacity of a mini-floppy. There is no feature of 
Apple's DOS that prevents a random access file 
being used sequentially if the records are 
contiguous. 



The program keeps the byte parameter up to date 
when the file is being written tD and, although 
the file length is stored as a byte number, 
together with the number of records in a 
combined fixed length field in record zero, this 
number is recalculated and used in a ",R"i "»B" 
format. It is not necessary to specify ",R" and 
",8" for any WRITE to the file other than the 
first one of a batch, however, not to do so would 
only require extra coding. 



j q REM DEMONSTRATION SEQUENTIAL 

11 REM FILE HANDLING 

12 REM XXXXXXXXXXXXXXXXXXXX**** 

13 REM HEDLEY G WRIGHT 

14 REM ARGYLL RESEARCH 

15 REM AND ANALYSIS 

16 REM 19TH MARCH 1982 

17 REM XXXXXXXXKXXXXXXXXXMXXXXX 

100 WRKAREA * PEEK < PEEK <992> + 
PEEK (993) * 256) + < PEEK 

( PEEK (989) + PEEK <990) * 

256) ) * 256 + 22 
110 TEXT t HOME i IF WRKAREA < > 

46545 THEN INVERSE J PRINT 

"THIS IS NOT A 48K SYSTEM" * 

normal: PRINT 

120 PRINT "WHAT IS THE NAME OF T 
HE SEQUENTIAL FILE" 5 PRINT ; 
INPUT FILNAME* 

130 GOSUB lQOO: REM * OPEN THE F 
ILE 

140 ONERR GOTO 1510 
150 VTAB 10 t CALL - 958: PRINT 
"ENTER NEW DATA, <RETURN> TO 
QUIT" 

160 PRINT t INPUT "DATA - " JENTR 
Y* 

170 IF LEN (ENTRY*) ■ THEN 20 


180 GOSUB 2000 t REM * WRITE NEW 

DATA 
190 GOTO 150 

200 GOSUB 3000: REM * CLOSE THE 
FILE 

210 HOME t PRINT "THE "FILNAME*" 
FILE" * PRINT "IS NOW CLOSED 
": PRINT : PRINT "DO YOU WIS 
H TO READ THROUGH THE FILE" ♦ 
PRINT "<Y> OR <N> "?: INPUT 
ANSWER* 

220 IF LEFT* < ANSWER** 1 ) < > rt 

Y" THEN 310 
230 GOSUB 1000 : REM * RE-OPEN TH 

E FILE 

240 IF FIELDNUM = THEN PRINT 
"THERE ARE NO RECORDS" : GOTO 
300 

250 PRINT CHR* ( 4 ) "READ" FILNAME 
* 

260 FOR COUNTER = 1 TO FIELDNUM 
270 INPUT ENTRY* 
280 PRINT ENTRY* 
290 NEXT COUNTER 

300 PRINT CHR* ( 4 ) " CLOSE "FILN AM 
E* 
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310 PRINT J PRINT "THAT IS THE E 

ND OF THE PROGRAM YOU MAY" 5 PRINT 
"APPEND MORE DATA TO THE FIL 
E BY" ! PRINT "RE-RUNNING IT" 
J END 

1000 REM * INITIALISE NEW FILE 
R OBTAIN LENGTH OF EXISTING 
ONE 

1010 ONERR GOTO 1500 

1020 PRINT CHR* ( 4 > "OPEN"FILNAM 

E* n ,L"256 
1030 PRINT CHR* < 4 > "READ"FILNEM 

E* 

1040 INPUT ZERECRD* * PRINT CHR* 
(4) 

1050 FIELDNUM = VAL ( LEFT* ( ZER 

ECRD*,6)) 
1060 LASTBYTE ■ VAL < RIGHT* ( ZE 

RECRD* ,6) ) 
1070 IF ERFLAG THEN ERFLAG ■ 5 GOTO 

140 

1080 RETURN 
1321 MARCH1982 

1500 IF PEEK <222> - 5 THEN 153 


1510 PRINT CHR* (4>"CL0SE" 
1520 PRINT "ERROR " PEEK <222>" 

IN LINE " PEEK (218) + PEEK 

(219) * 256'. END 
1530 FIELDNUM ■ 
1540 LASTBYTE = 13 
1550 ERFLAG = 14 GOTO 30 00 
2000 REM * WRITE A RECORD 
2010 PRINT CHR* ( 4 > "WRITE'TILNA 

ME*",R" INT < LASTBYTE / 256) 

" ,B"LASTBYTE - INT (LASTBYT 

E / 256) * 256 
2020 PRINT ENTRY* 
2030 FIELDNUM = FIELDNUM + 1 
2040 LASTBYTE - PEEK (WRKAREA + 

21) + ( PEEK (WRKAREA + 19) + 
PEEK (WRKAREA + 20 ) * 256) * 

256 

2050 PRINT CHR* (4) 
2060 RETURN 

3000 PRINT CHR* ( 4 ) "CLOSE "FILNA 
ME* 

3010 PRINT CHR* ( 4 > "OPEN"FILNAM 
E* 

3020 PRINT CHR* (4> "WRITE" FILNA 
ME* 

3030 ZERECRD* = RIGHT* ("00000" + 
STR* (FIELDNUM), 6) + RIGHT* 
("00000" + STR* (LASTBYTE), 
6) 

304 PRINT ZERECRD* 
3050 PRINT CHR* (4 ) "CLOSE" FILNA 
ME* 

3060 IF ERFLAG THEN 1000 
3070 RETURN 
1 



UPDATING THE DOS 3 f Z MANUAL 

TO 3.3 

By David Bolton 

A large number of people appear to have 
upgraded to DOS 3.3 by either buying a language 
card, or by obtaining the P5A/P6A chips. In 
either case, they will not have the DOS 3.3 
Reference manuali and the following notes 
therefore detail how this varies from the 3.2 
Reference manual. 

Page 38 The COPY progran will now provide single-drive 
copying. 

Page 44 The UPDATE program is renamed MASTER CREATE. It 
will NOT update a 3.1 or 3.2 disc to 3.3. 

Page 128 Track /Sector List- friend, inter-alia, to resdi- 



sectors) 



3/4 Not Used 

5/6 Sector Base Nunber (counts groups of 122 

7/b Not Used 



Page 12? Third Para- Delete last sentence (If a 
complete...... ....). 

Fourth Para- DOS 3.3 would use 12 sectors for 
Track/Sector list and one for record totals 13. 

Page 130 Second Para- Directory begins at Track Ml Sector 
*K (not *C) and allows nax. 105 files. 

Directory entry for one file- Relative bytes 
21/22 contain sector count. 

Page 132 Change Table- Byte 2 Value F 

3 4 
31 F 
35 F 

Page 133 Track Bit HapJ- 

Byte Bit Sector Byte Bit Sector 



1st 



2nd 7 
6 

5 5 
1 

3 
2 
1 




3rd and 4th- 
all spare. 



Page 134 Typical Track Bit Hap- Attend in accordance with 
above. 

Page 135 There are 196 sectors available to user. 

friend all references to sector *C to read »F. 

Page 166 Initialising a diskette- change reference to 
UPDATE to read MASTER CREATE. 

Page 171 Copying a text file- refer to FID program 
(Appendix J). 



Page 44 HARDCORE - The Journal of the British Apple Systems User Group June 1982 



* star trek 

The full instructions for the version on BASUG 
Disc 25. 

APPLE DC TREK is a sophisticated 
space war oame in which the player, as 
Captain of the Starship ENTERPRISE is 
sent on a search and destroy mission 
against the KLINGON Empire Fleet. The 
APPLE DC computer creates the game en- 
vironment, operates the KLINGON Cruisers 
in combat and transforms the APPLE DC 
keyboard and display into a spaceship 
command console. 



THE GALAXY 

APPLE DC TREK is played in a galaxy 
which is represented by a arid of 64 
Quadrants charted as an 8 by 8 array. 
Each quadrant contains 64 sectors, again 
in an 8 by 8 array. The sector is the 
elemental Location in the universe and 
nay be occupied by only one of a star, a 
KLINGON, or the ENTERPRISE. The galaxy 
is a closed space in which the opposite 
edoes are actually adjacent to each 
other. Moving to Galactic East of the 
Eastmost quadrant, the ENTERPRISE will 
enter the Westmost auadrant. At the 
start of a mission,, the APPLE places all 
stars, Klinnons, bases, and your ship at 
randan. 

THE STARSHIP ENTERPRISE 

The ENTERPRISE is a powerful craft 
with somewhat more firepower and energy 
capacity than the battle cruisers of the 
KLinqon fleet. However, the ENTERPRISE 
is usually heavily outnumbered and is 
easily destroyed unless aood maneuvering 
and firing strategies are used. 

The ENTERPRISE has two forms of 
weaponry; Photon Torpedoes <PH TORPS) 
and Phasers. The ENTERPRISE normally 
carries 10 PH TORPS which may be re- 
stocked through energy conversion or by 
visiting a base. 

The ENTERPRISE carries energy in 
three forms; available energy, shield 
enerqy, and PH TORPS . The available 
energy is used for Phasers, propulsion, 
and to operate the ship's sensory and 
display subsystems . 

Shield energy is carried in ship's 
shields to absorb hits from attacking 
Klinqons. If the FNTFRPRISE receives an 
enemy hit that reduces its shield enerqy 
too low, then the ENTERPRISE may sustain 
damage to its subsystems (see damage re- 
port). 



PH TORPS are considered as enerqy in 
determining the maximum allowable enerqy 
aboard the ENTERPRISE. Also, PH TORPS 
can be converted directly into energy or 
formed from enerqy. The transformation 
consumes energy. 

The ENTERPRISE receives new energy 
from contact with restockinq bases and 
from on-board Dilithium Crystals. In 
addition, energy reallocation between 
available energy, shield energy, and 
PH TORPS may be directed by the captain. 
Rendezvous with a restocking base brinqs 
the ENTERPRISE back to maximum and repairs 
all sub-systems. The restocking base is 
depleted by this action and can not be 
used aqain. The on-board Dilithium Cry- 
stals generate energy at a rate of 50 
units per 0.1 stardate. 

KLINGON BATTLE CRUISERS 

The Klingon Battle Cruiser is some- 
what less powerful than the ENTERPRISE 
but usually runs in squadrons of several 
ships at a time and therefore may have 
greater joint firepower than the ENTER- 
PRISE in a battle. Each Klingon has 800 
units of energy and 3 Photon Torpedoes 
(PH TORPS) at the beginning of a battle. 
The Klingon enerqy may be used for Phasor 
fire, movement, or to absorb hits from 
the ENTERPRISE. when the Klinqon energy 
is reduced to zero, the Klingon is des- 
troyed. 

The Klingons have both Phasors and 
PH TORPS which operate the same as the 
ENTERPRISE (see below) except that the 
Klinqons cannot lock PH TORPS, or con- 
vert between PH TORPS and ENERGY. 

Klingon's can move one sector dis- 
tance per turn durinq a battle. They may 
retreat into adjacent quadrants and fle- 
comc restocked at that time. 



CONSOLE DISPLAY 

The console display for the APPLE 
TREK mission is presented in four display 
segments- The top third of the screen 
displays the Galactic Record, the lower 
left of the screen contains a detailed 
display of the current quadrant, the 
lower ripht of the screen is a status 
display, and the center of the screen is 
reserved for command 1/0. 
THE GALACTIC RECORD 

The Galactic Record is displayed at 
the beqinning of the game or whenever any 
navigation command is entered. The Gal- 
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8 



by 8 array of 
a summary of the 
Bases, and stars in 
qalaxy that have 
the qame. Fiqure 



actic Record is an 
numbers represent inq 
number of Klinqons, 
each quadrant of the 
been observed during 
1 shows a typical Galactic Record- The 
number shown in a square of the Galactic 
be interpreted digit by 
ones diait is the number of 
quadrant, the tens diqit is 
bases, and the hundreds 
number of Klinqons. Some 



Record shou Id 
diqit- The 
stars in that 
the number of 
diqit is the 



examples would be: 

305 3 Klinqons, no bases, 5 stars 
13 1 base, 3 stars 
4 4 stars 

The Galactic Record contains data 
for each quadrant that the ENTERPRISE has 
occupied. In addition, the data for the 
S surroundinq quadrants are presented if 
the Lono Ranqe Sensor is operational. 

The Galactic Record display area is 
also used for several other utility dis- 
plays such as the Probe and Damaqe Report. 

THE QUADRANT DISPLAY 

The Quadrant Display presents a de- 
tailed picture of the quadrant currently 
occupied by the ENTERPRISE. Fiqure 2 
illustrates a typical Quadrant Display. 
The display is in inverse video. The 
locataion of the ENTERPRISE is indicated 
an "E", Klinqons are shown as "K", stars 
as ,r *" # and bases as "B". 

THE STATUS DISPLAY 

The Status Display presents a brief 
summary of the current status of the 
ENTERPRISE. The display includes current 
sector location, years remaininq in the 
mission, current stardate, conditior 
code Careen = no problems, yellow = lov 
on energy, and red = Klinqons present), 
shields (percentage of total enerqy that 
will no to shields), shield enerqy, 
available enerqy, number of PH TORPS, 



FIGURE 1 






SAMPLE GALACTIC RECORD 






: :3 :104:4 : 




* 




: :12 :8 :21 : 








: : :3 :312:t04:4 




• 
■ 




: :11 :2 :3 :16 








: :1 :202:4 :5 




■ 


Note: The Quadrant that 


the 


ENTER- 


PRISE is in will appear in 


inverse video. 







number of Klinqons, and number of bases. 
The last line of the Status Display in- 
dicates the course coordinates set by the 
on-board computer to permit fire and move 
sequences. 

The Status Display area is also used 
to display the list of possible commands 
whenever a non-leqal command is entered. 

COMMANDS 

The ENTERPRISE is controlled by en- 
terinq the followinq commands from the 
keyboard: 



1 - 


Navigation 


2 - 


Set Shield Enerqy 


3 - 


Damage Report 


4 - 


Phasers 


5 - 


Ph Torps 


6 - 


Load Ph Torps 


7 - 


Computer 


8 - 


Prohe 


9 - 


Self Destruct 



The request for a command appears in 
the left center display area. The commands 
operate as described below. 

1-NAVIGATI0N 

The Naviqation command is used to 
move the ENTERPRISE to different sectors 
within a quadrant, or to different 
quadrants within the qalaxy. After 
pressing "1", the Galactic Record is dis- 
played. If warp Drive is not damaqcd, 
the auestion WARP OR ION (W OR I)? will 
appear. Warp Drive is used for movement 
between quadrants. A warp factor will 
be requested. Movement will occur to a 
quadrant that is that many units distant- 
Similarly, with Ion Drive, duration wiLl 
be requested and will specify the number 
of sectors to move within the quadrant, 
with both warp and ion drive,, a course 
is also requested. This is simply the 
anqle or direction that you wish the 
ENTERPRISE to travel in. Galactic North 



FIGURE Z 
SAMPLE QUADRANT DISPLAY 

1 

2 

* * 3 
K 4 

K E 5 

* 6 

* * 7 

B 8 
12 3 4 5 6 7 8 

Note: Display is in inverse video 
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(up on your screen) is degrees. East 
(to the right) is 90 degrees, etc. Any 
number between and 359 may be entered. 

2 - SET SHIELD ENERGY 

The ENTERPRISE maintains a certain 
portion of its available energy in the 
shields to absorb blows from Klingon 
fire. If the shield energy goes below 
10 units, damage may be sustained to the 
operating systems of the ENTERPRISE. 
The Set Shield parameter sets the per- 
centage of total energy that goes to 
shields. This value is initially 50%. 

3 - DAMAGE REPORT 

Command 3 will cause the top portion 
of the screen to display the current 
status of all of the ENTERPRISE systems 
such as Phasers, PH TORPS, Computer, etc. 
If the suhsystem is operational, the dis- 
play will indicate OK. If damage has 
occurred, the display will indicate the 
estimated time reauired to repair the 
subsystem. 

A - PHASERS 

Firing the Phasers will cause a 
blast of energy to be shot at all targets 
within the quadrant. The energy is 
equally divided among the targets and 
is diminished by the distance between 
the ENTERPRISE and the target. The 
available energy of the ENTERPRISE is 
decreased by the amount of Phaser fire. 
Hits on the Klingons will decrease their 
energy by a like amount. Phasers can 
be locked on to one or more targets 
using the computer <see below). In that 
case, the energy is spread evenly between 
the selected tarqets. Phaser fire is not 
blocked by stars or Klingons. 

5 - PH TORPS 

Photon Torpedoes may be fired under 
manual or automatic control. Under man- 
ual control, only a single TORP may be 
fired- A trajectory must be input (angle 
is similar to course discussed above). 
Under automatic control, you can use the 
computer to lock-on to any number of tar- 
gets (see computer section). The com- 
puter then directs the PH TORPS to their 
targets. The only disadvantage to auto- 
matic fire is that the Klingons then get 
to shoot first. 

Photon Torpedoes will cause 500 
enerqy units of damage if a hit is made. 
The torpedo will hit the first object 
that it encounters on the given trajec- 
tory, be that a Klingon, a star, or a 
base. 



6 - LOAD PH TORPS 
Photon Torpedoes can be converted to 

or from energy using this command- You 
will be asked how many TORPS to load. A 
positive number response will convert 
energy to PH TORPS at a rate of 500 units 
of energy each- A negative input will 
convert PH TORPS to energy at the same 
rate. 

7 - COMPUTER 
The captain of the ENTERPRISE has an 

APPLE-81 computer at his disposal, giving 
him a major advantage over his Klingon 
opponents- The computer has 7 command 
options which will be displayed whenever 
a non-legal input is made (such as or 
8), These options allow you to compute 
a course angle to any given set of sector 
or quadrant coordinates, compute a 
trajectory to a Klinqon, lock Phasers or 
PH TORPS to any number of targets, lock 
in a course, or display ship's status. 
ControL can be returned to command mode 
by entering the return command (option 

7 while in Computer mode). 

8 - PROBE 

The Probe command is used to assess 
the stK£oqJh. of Klingons that are in the 
same quadrant as the ENTERPRISE. The 
command will display the coordinates, 
energy levels, number of PH TORPS, and 
"lock" status of all Klingons in the 
current quadrant. The "lock" status 

specifies whether or not the Klingon's 
Phasers or PH TORPS are locked-on to 
the ENTERPRISE or not. The Probe infor- 
mation is displayed in the Galactic Record 
display area. 

9 - SELF DESTRUCT 
The Self Destruct command should be 

reserved until there is no hope of the 
survival of the ENTERPRISE. It will 
cause the ENTERPRISE to explode, hope- 
fully taking any nearby Klingons with it- 

cnd or A MISSION 
A mission will end when one of three 
events occurs. If all Klingons are 
destroyed, the ENTERPRISE has success- 
fully completed its mission. If the 
time allotted for the mission runs out, 
the mission ends with the Klingons still 
threatening the empire- Finally, if the 
ENTERPRISE is destroyed, the mission is 
considered a failure. Your performance 
will be rated under each of these cir- 
cumstances and an appropriate dispatch 
from Star Fleet Command will be sent. 
Your rating will depend on the overall 
success of your mission, on the number 
of bases used up, the amount of time 
required, and the amount of energy and 
PH TORPS used. 
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The moat versatile diskette tiling 
system available. 

This unique, modular system 
gives you safe, dust-free storage 
for your data while, at the same 
time, making it extremely easy to 
get to. 

Sturdy, interlocking cases, each 
holding ten diskettes in a slide-out 
drawer, can be arranged in rows or 
stacks of almost any size to meet 
your space requirements. 

As your diskette library grows, so does 
your storage/filing system. Any number 
of the modular cases can be interlocked 
to form a unified and convenient filing sys- 
tem. And. more cases can be added at 
any time — either horizontally or vertically. 
And goes with you 

When you travel, individual cases make 
perfect diskette carriers, and are easily 
removed without disturbing the rest of 
the system. Additionally, cases can be 
removed tor storage in a fireproof safe, 
or easily rearranged to meet new space 
requirements. 

Each case comes with two pressure 
sensitive identification labels. Label sur- 
faces can be typed on or marked on 
with pen or pencil to show, at a glance, 
which diskettes the case contains. So, 
you can quickly find the diskette you 
need — when you need it 



The ultimate in diskette storage, 
protection and retrieval 



£2 75 



INCL VAT 
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SATURN SYSTEMS 

128K and 32K doards and VC— Expand 
The 32K BOARD 

Conies with uiiliiit". to.illow the movement 

ol DOS jnd the use oi Integer together 
with the ilbiHlN lo More subroutine* on ihc 

bojfd 10 he i .illed ttom a main urogram, 
The tin.il uriltiv allows the board or 
multiple ot boards 10 be used as a last disk 
drive 
£149.00 

128K BOARD 

Can be used as above with the additional 

Idcihu to use the card as «i last disk 

tliive in C PV1 and PASCAL in addition to 

BASIC 

£359.00 

VC EXPAND 

Is a utility thai can be used with either ilie 
above two boards to give additional 
memory (or VISICAIC models, up to 146k 
with the 128 board — and more with 
additional boards 
£55.00 

COMING SOON 

A version of VC EXPAND to allow use of 
VISICALC with the VIDCX BOcolumn board 

(VIDEX 80 column board— £185.00) 
(VISICALC— £105.00) 

MICROSOFT PRODUCTS 

MICROSOFT have written most of the- 
BASICS for the World's Micros. As 
MICROSOFT'S biggest UK distributor wc 
carry a wide range of MICROSOFT 
products (or APPLE 

TASC the Applesoft computer 

True mat hint* code programs for your 

APPLESOFT BASIC 

C109.00 

Z— 80 SOFTCARD 

THE C/PM System for APPLE Over 35.000 

sold to Apple users world-wide, making 
APPLE the most popular C/PM system 
£189.00 

A.L.D.S. — Assembly Language 
Development 

System ran handle 6S02. 7-fiO or 8080 
£79.00 

FORTRAN 80 1 109.00 
COBOI 80 Q59.0Q 

THE ENHANCER II 

The dawn of a new era for the APPLE II 

Introducing the ENHANCER II— a new 
standard which is improving the 
relationship between Hun inns and Apples 
The Enhancer II can help your Apple It's 
keyboard become more sociable by 
remembering words oi phrases whit h t an 
be entered into the Apple by the mere 
touch of a key. Life can become even easier 
because the Enhance/1 II can remember 
what you typed while your Apple was busy 
(alking to your disk -for doing other things). 

Naturally, it knows the difference between 
upper and lower case letters and what shift 
keys are supposed to do. it even knows to 

auto repeal <i"y key held down. The 
Enhancer II replaces the encoder board 
making installation simple. 



The APPLE Computer Specialists 

Hardware & software distribution is our 
business - WORLDWIDE 

Payment in sterling or dollars 
other currencies by arrangement 



Over 600 items for 
APPLE 

From business to scientific, 
from education to pleasure. It's 
here NOW, make sure you get 
YOUR Copy — write or telex 
either of our offices now. If 
you're interested in Apple 
computers, you can't afford to 
be without it. 



D BASE II— from Ashton Tate 

For Apple II with Z-80 softcard 

A true relational database able lo work on 

multiple files — gives you the power to use 

your Apple for jobs that were previously 

rescrveo for main frames.. 

£395.00 

MICROSOFT Z-80 SOFTCARD €189.00 

WORD PROCESSING 

The Wordstar Family (requires 2-80) 

WORDSTAR £145.00 
MAILMERGE £69.00 
SUPERSOFT £85.00 
DATASTAR £140.00 
SPELLSTAR £89.00 

WORDSTAR Training Manual £19.00 

MACHINE COVERS — only the best 
material used 

Apple only €5.95 
Single Disk £2.95 
2 stacked disks £4.45 
Apple, 2 disks and 9" monitor or Apple 
and 12" monitor £8.95 
Apple and 2 disk £7.95 
Epson MX 70/80 £5.45 
Paper tiger 445-460 £5.45 
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KEYPLUS trom Aids Data 

A Visicalc compatible keypad with 
left and right arrows, space bar'and 
escape key in Addition to numbers 

£99.00 

CLIP-ON APPLE FAN 

With forward facing Apple power 

switch neon lit 

£49.00 

COOL-STACK 

A colour compatible shelf 
arrangement with integral Ian to sit 
over Applo to accommodate disk 
drives, act as a stand for a monitor 
plus allow easy access to the inside 
of your Apple 
£69.00 

NEW VISISCHEDULE 

from the publishers of Visicalc 
A poweriul project planner. Allocates 
all costs, specifies earliest and latost 
start dates prerequisites and 
deadlines for each task, automatic 
calculation and display of critical 
path. Can link with other Visi 
programs 
£189.00 

MATHSMAGIC 

A unique number processing system 
designed for linear sequential 
calculations using a threaded 
interpretive language. Make your 
Apple a very powerful proqrammable 
calculator 
£59.00 




ppkz computer 



Authorised Apple Sales and 
Service 



LONDON RETAIL 

98 Moyser Road, London SW16 feSH 
Telephone 01-677 2052/7341 

MAIL ORDER AND DISTRIBUTION 
Waingate Lodge, Waingate Close, 
Rossendale, Lane. BB4 7SQ 
Telephone (0706) 227011 



Prices do not include VAT please add 
15% to your remmittance 
Postage and packing FREE 

Telex No. 635740 

Orders welcome by phone or telex 
PETPAM C 



